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VOORWOORD 


Dit boek is voornamelijk bedoeld voor bezitters 
van de Sinclair ZX81 computer in basisuitvoe- 
ring (dus met 1K aan geheugen) die een beetje 
zijn uitgekeken op de beperktheid van hun ap- 
paraat en van plan zijn een 16K-uitbreidings- 
unit en misschien zelfs de ZX-printer aan te 
schaffen. De bedoeling is u de juiste stijl van 
programmeren te leren en u vertrouwd te ma- 
ken met de capaciteiten van de 16K-RAM-unit 
en van de ZX-printer. 

In hoofdstuk 1 wordt de nieuwe “hardware” ge- 
presenteerd: de Sinclair 16K-geheugenuitbrei- 
ding en de printer van hetzelfde merk, In 
hoofdstuk 2 wordt uitgelegd hoe we de nieuwe 
geheugenruimte kunnen gebruiken en wordt 
een simpel programma beschreven, waarmee 
men de werking van de geheugenunit kan con- 
troleren. 

Het schrijven van grotere programma’s vereist 
bepaalde technieken, deze komen in hoofdstuk 
3 aan de orde. 

Hoofdstuk 4 is het voorspel tot het betere werk: 
door middel van vijf uitgewerkte programma’s 
voor populaire spelletjes wordt de gebruiker ge- 


wezen op de vermeerderde grafische mogelijk- 
heden van de 16K-computer, De vier volgende 
hoofdstukken gaan over het schrijven en het 
corrigeren van grotere programma’s, de tech- 
nieken om deze programma’s op cassette op te 
nemen en zowel het programma als het resul- 
taat door middel van de ZX-printer te vereeu- 
wigen, In deze hoofdstukken komen ook de 
technieken aan bod die nodig zijn voor het op- 
starten van gegevensbestanden, het uitwerken 
van statistische analyses, het opzetten van een- 
voudige boekhoudsystemen en het uitprinten 
van tekst en figuren. In hoofdstuk 9 wordt die- 
per ingegaan op het werken met willekeurige 
getallen. Het laatste hoofdstuk, tenslotte, intro- 
duceert het programmeren in machinecode en 
geeft duidelijk aan wat de voordelen van deze 
techniek zijn, 

Als u, met dit boekje als gids, er achter komt 
hoe veelzijdig en krachtig uw “nieuwe” 16K 
ZX81 is geworden, dan zijn wij in onze opzet 
geslaagd. 


M. James: 5. M. Gee 


1. BREID UW ZX 81 UIT! 


Het programmeren op de ZX8I met slechts IK 
aan geheugencapaciteit mag voor de beginnen- 
de programmeur spannend en uitdagend zijn. 
na niet al te lange tijd slaat die spanning echter 
gegarandeerd om in een grote frustratie, Al pro- 
grammerend en lerend ontdekt men de onvoor- 
stelbaar vele mogelijkheden van de ZX81, maar 
ondervindt tegelijkertijd hoe weinig met de ba- 
sisuitvoering van de machine haalbaar is. Een 
aantal van de unieke eigenschappen van deze 
machine, zoals bijvoorbeeld het tekenen van 
bewegende beelden, komen helemaal niet tot 
zijn recht met slechts IK aan geheugen. Een- 
maal de fundamenten van de ZX-BASIC-taal 
onder de knie hebbend, ontstaat al snel de be- 
hoefte eigen ideeën over programma’s te willen 
uittesten en dan jeuken de handen om de capa- 
citeit van de machine te vergroten. Gelukkig 
dat dit bij de ZX81 zeer gemakkelijk kan; er 
staat op dit moment een keur aan uitbreidings- 
units ter beschikking. 

Over twee van deze uitbreidings-”hard-ware” 
gaat dit boekje: de 16K-geheugenunit en de 
ZX-printer. 


De 16K-RAM-unit 

Er zijn op dit moment diverse geheugenunits 
voor de ZX81 in de handel. Hoewel deze alle- 
maal voldoen en in grote lijnen op dezelfde ma- 
mer werken, hebben wij dit boekje geschreven 
aan de hand van de door Sinclair Research zélf 
op de markt gebrachte ”16K-RAM-pack”. 
Deze kompakte unit bevat acht 2K-RAM ge- 
heugen-IC’s en is voorzien van een tweezijdige 
printplaatconnector waarmee hij met de print 
уап de 2Х81 kan worden verbonden. Nu is 
deze verbinding vrij kritisch, want een onder- 
breking, al is het maar voor even, betekent on- 
herroepelijk het verlies van alle, vaak met veel 
moeite, in het geheugen geschreven informatie! 
En daar het in de praktijk wel eens wil voorko- 
men, dat er tegen de machine wordt gestoten, 
waardoor de verbinding tussen ZX81 en geheu- 
genmodule wordt onderbroken, is het toch wel 
de moeite waard even bij dit zwakke punt te 
blijven stilstaan, 


Er zijn een aantal remedies te verzinnen, waar- 
van de meest radikale is het vastsolderen van de 
unit aan de “moeder”-print van de computer. 
Hoewel dit zonder meer de beste oplossing is, 
raden wij hem toch af, omdat u dan nooit meer 
lets anders op de computer kunt aansluiten. 
Niet fraai, maar wel praktisch is het volspuiten 
van de ruimte tussen de achterwand van de 
computer en de unit met plastisch blijvende sili- 
conenkit. Deze versteviging voldoet voor het 
opvangen van alle normale mechanische belas- 
tingen van de machine, zoals stoten en ver- 
schuiven. Bovendien kan deze kit in voorko- 
mende gevallen met een scherp mesje worden 
losgesneden, waardoor de expansie-”bus” op de 
achterzijde van de computer weer ter beschik- 
king staat voor andere uitbreidings-”hardware”, 
Dat is bijvoorbeeld al nodig als we, naast de 
16K-unit, ook de ZX-printer willen gaan ge- 
bruiken, De printer-interface, het kastje dat de 
extra elektronica bevat voor het sturen van de 
printer, moet dan in de plaats van de 16K-unit 
rechtstreeks in de ZX8I worden geplugd. De 
RAM-pack past dan op haar beurt in de achter- 
zijde van de printer-interface. Het zal duidelijk 
zijn, dat de totale konstruktie nu extra gevoelig 
15 voor stoten: de weg tussen ”moeder”-print en 
geheugenuitbreiding is op deze manier extra 
lang! Toch is gebleken dat er nauwelijks con- 
tactproblemen te verwachten zijn, als de combi- 
natie computer-interface-RAM-pack ор сеп 
gladde, harde ondergrond wordt opgesteld. 

U kunt er op rekenen, dat alles goed zit als de 
verbinding tussen computer en RAM-pack niet 
buigt of beweegt, als enige toetscn van het toet- 
senbord worden aangeraakt, zoals dat bij het 
intikken van programma’s gebeurt. 

De geringste beweging hierbij verraadt een niet 
stabiele opstelling! U kunt dan proberen het ge- 
heel met tweezijdig klevend plakband op een 
stevige en gladde ondergrond, zoals bijvoor- 
beeld een stuk meubelplaat, te verankeren. 


Nieuwe programmeervooruitzichten! 
Het beschikken over 16K extra geheugenruimte 
maakt het leven van een programmeur veel ge- 


makkelijker. De noodzaak om listige en verge- 
zochte truukjes te moeten toepassen om pro- 
gramma’s korter te maken, vervalt immers. 

Zo ook de ergernis, vanwege plaatsgebrek, ex- 
tra’s niet in programma’s te kunnen opnemen. 
De nadruk kan nu liggen waar hij moet liggen: 
bij het rustig schrijven van goed gestileerde pro- 
gramma's. 

U zult ervaren dat het gebruik van de ZX81 
veel leuker wordt. U kunt nu immers veel inge- 
wikkelder programma’s aanpakken en meer uit- 
eenlopende problemen op uw computer uitwer- 
ken. Maar al doende, zult u ondervinden dat 
het uitbuiten van alle nieuwe mogelijkheden 
ook meer kennis vereist. Kennis over nieuwe 
programmeertechnieken en andere inzichten 
over het omgaan met het geheugen. Vergeet 
niet dat u opeens de beschikking heeft over niet 
minder dan 16 keer de originele geheugenruim- 
te! 
Uw “oude” ZX8] kon al heel wat, maar met de 
“nieuwe” Кап met aangepaste programmeer- 
technieken nog veel meer te voorschijn worden 
getoverd. Hierop is dit boek gebaseerd. Het 
leert u deze nieuwe technieken beheersen, be- 
grijpen en gebruiken om uw 16K-geheugen- 
ruimte uit te buiten. Daarnaast draagt het vol- 
doende materiaal aan om zelf aan de slag te 
gaan. 


De ZX-printer 

U moet echt gaan denken aan het aanschaffen 
van cen ZX-printer! Nu u over zoveel extra ge- 
heugen kunt beschikken, en programma’s kunt 
uitschrijven, die niet meer in één keer op het 
schermbeeld passen, kunt u in feite niet buiten 
een printer, Het is zo goed als onmogelijk fou- 
ten in deze programma’s op te sporen door het 
scherm af tc lezen. Vaak moet u immers door 
“GO TO”-instrukties op het einde terug naar 
het begin en dat 15 alleen met een volledig uit- 
geschreven programma nog enigszins te over- 
zien. 

U kunt uiteraard uw programma’s met de hand 
uitschrijven; waarschijnlijk ontstaan er dan nog 
meer fouten! 

Kortom, de enige praktische methode om lange 
programma’s te korrigeren, is dit met de ZX- 
printer te doen. Bovendien betekent het gebruik 
van de printer tal van nieuwe toepassingen voor 
uw computer, 

U kunt gegevens, zoals financiële overzichten 


en adressenbestanden, bewaren op cen papier- 
strook, de zogenoemde “hard copy”. De ZX- 
printer kan echter meer dan enkel letters en cij- 
fers uitschrijven. Met de 16K-unit kunt u im- 
mers experimenteren met grafische voorstellin- 
gen met hoge resolutie. 

Ook deze grafische voorstellingen kunnen door 
de printer op papier worden vastgelegd en be- 
waard voor later. 

Natuurlijk heeft de ZX-printer zijn beperkin- 
gen. 

Vergeleken met andere op de markt zijnde ap- 
paraten, is de maximale schrijfbreedte zeer ge- 
ring en hij gebruikt glanzend, grijsachtig alumi- 
nium-papier, dat er niet zo leuk uitziet. In de 
praktijk blijkt echter dat een ZX-printer-output 
zonder problemen kan worden gefotokopiëerd. 
De kopie is erg scherp en mooi zwart op wit. 
Een groot bezwaar is het flikkeren en rollen van 
het beeld, als men de printer de beeldinforma- 
tie laat uitplotten. Bij het schrijven op papier 
maakt hij nogal wat lawaai en veroorzaakt sto- 
ringen op uw beeldscherm. 

Zijn enige, echte voordeel is zijn onvoorstelbaar 
lage prijs, vergeleken met de printers die er op 
dit moment op de markt zijn. 

De prijs-prestatie-verhouding ligt bij de ZX- 
printer zeer hoog! 


Hoe u dit boek moet gebruiken 

Dit boek veronderstelt een bepaalde kennis van 
de 7Х81 en de BASIC-programmeertechnie- 
ken. Wij gaan er vanuit, dat de lezer enige erva- 
ring met de 1K-uitvoering van de computer 
heeft opgedaan en dat het niet noodzakelijk is 
alle in dit boek toegepaste technicken uit te leg- 
gen. 

Verder gaan we in op het serieuze werk: het op- 
stellen van nuttige programma’s op het gebied 
van statistiek, financieén behcer- en gegevens- 
bestanden. 

Uw ZX8I is immers door het uitbreiden van 
zijn geheugencapaciteit van een eenvoudig 
speeltuigje bevorderd tot een “echte” miero- 
computer, 

Daarom kunt u ook een meer wetenschappelij- 
ke aanpak van de programmeertechnieken ver- 
wachten. 

Het kan best zijn, dat u bij het lezen van de vol- 
gende hoofdstukken af en toe met uw ogen zult 
knipperen, want soms gaan we er tamelijk hard 
tegenaan! 


Als u het allemaal niet zo één-twee-drie kunt 
volgen, is er geen man over boord, U kunt de 
programma’s gewoon gebruiken en er later op 
terugkomen als u meer inzicht heeft gekregen 
door het zelf schrijven van langere program- 
mae, 

Het is niet noodzakelijk het gehele boekje door 
te ploeteren. Als u bijvoorbeeld voornamelijk in 
het programmeren van spelletjes bent geinteres- 
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seerd, kunt u eenvoudig verder gaan met hoofd- 
stuk 4. Net zo goed kunt u meteen naar hoofd- 
stuk 7 ”springen” als uw toepassingen zich op 
het gebied van de statistiek afspelen. 

Wat u ook met dit boekje van plan bent, bekijk 
wél hoofstuk 3 waar een aantal zeer nuttige 
“utilities” (kleine hulpprogramma's die het op- 
stellen van grotere programma’s veraangena- 
men) worden gegeven! 


2. 16K EXTRA GEHEUGENRUIMTE! 


Zoals u wellicht reeds weet, kunnen we in IK 
aan geheugenruimte precies 1024 symbolen on- 
derbrengen, Met een beetje rekenwerk komen 
we cr dan achter, dat we in 16K aan geheugen- 
ruimte niet minder dan 16384 symbolen kun- 
nen opslaan, Dit lijkt ontzettend veel en het ligt 
voor de hand ons af te vragen of we deze im- 
mense capaciteit ooit nodig zullen hebben. 

Het antwoord is simpel: ja! 

Ondanks de geheugencapaciteit van 16384 
plaatsen kan het in de praktijk voorkomen dat 
een programma alle geheugenplaatsen vult. 

Zo zal het onderstaande één-regelige program- 
ma: 


16 DIM А150, 166) 


een “out of memory” foutindicatie (code 4) op- 
roepen. Hoewel het een heidens karwei is om 
met de hand het geheugen vol te schrijven met 
16384 symholen, gebruiken programma’s soms 
voor ogenschijnlijk de eenvoudigste dingen gro- 
te geheugengebieden. 


Geheugenkaart en systeemvariabelen 

In het algemeen wordt de beschikbare geheu- 
genruimte van de ZX8I voor vier verschillende 
zaken gebruikt: 


1) het opslaan van programma’s; 

2) het opslaan van gegevens; 

3) het opslaan van schermbeeldinformatie, 
4) het opslaan van systeemgegevens. 


De meest voor de hand liggende taak van het 
geheugen is het opslaan van programma’s. le- 
dere programmaregel die u via het toetsenbord 
in de computer voert, wordt opgeslagen in het 
geheugen. In het algemeen kan men stellen dat 
iedere regel evenveel bytes in het geheugen in 
beslag neemt als er toetsaanslagen nodig zijn 
voor het schrijven van de regel. 

De tweede voorname taak van het geheugen is 
het opslaan van gegevens. ledere door u ge- 


bruikte variabele krijgt (door hem een naam te 
geven in het programma) een bepaalde ruimte 
in het geheugen toegewezen, waarin zijn waar- 
de kan worden bewaard, Een gemiddelde varia- 
bele eist ca 6 bytes op, er schijnt dus in de totaal 
beschikhare 16K genoeg plaats te zijn voor een 
flink aantal variabelen. Dat gaat op, tot men 
met array’s (gebieden) te maken krijgt! Deze 
verslinden een grote hoeveelheid geheugen en 
helaas is het werken met variabelen array’s nu 
net één van de kenmerken van het geavanceer- 
de programmeren, 

De twee laatstgenoemde taken van het geheu- 
gen liggen niet zo voor de hand en onttrekken 
zich voor het grootste gedeelte aan de controle 
van de gebruiker, De ZX8I reserveert een ge- 
heugendeel voor het opwekken van het scherm- 
beeld. 

Hoe dat precies in zijn werk gaat, is onder meer 
afhankelijk van de beschikbare geheugenruim- 
te. Bij de 16K ZX81 worden standaard 793 
bytes voor de schermbeeldinformatie gebruikt, 
onafhankelijk van wat er ap het scherm te zien 
is. In eerste instantie lijkt het een beetje vreemd 
zo veel geheugen vrij te houden voor het weer- 
geven van bijvoorbeeld een blanco scherm, 
maar de voordelen van deze standaard-proce- 
dure wegen ruimschoots op tegen het verlies 
aan geheugenruimte. Dit komt in hoofdstuk 4 
aan de orde. 


Naast deze geheugenruimte voor het beeld, 
heeft de machine ruimte nodig om interne ge- 
gevens op te slaan. Interne gegevens zijn bij- 
voorbeeld informatie over waar een bepaald 
programma eindigt of over de plaats van de 
cursor op het scherm. Dit soort geheugenplaat- 
sen worden ”systeem-variabelen” genoemd en 
er zijn bij alle ZX8l-uitvoeringen 124 bytes 
voor deze variabelen gereserveerd. 

Het kan nodig zijn te weten hoe alle genoemde 
taken in het totale geheugen zijn onderge- 
bracht. Vandaar dat een “geheugenkaartje” 
(memory-map) op zijn plaats is. 
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adres gebruik 


16384 systeem-variabelen 
16509 

programma 
ІК display-file 
KARS variabelen 
ELINE regel, die wordt ge- 

schreven 
SEKBOT calculator-stack 
SEREND vrije RAM-ruimte 
Slack pointer machine-stack 
ERRESP gosub-stack 
ҚАМТОВ vrije RAM-ruimte 
32767 


Uit dit overzicht blijkt, dat sommige indelingen 
van het geheugen beginnen en eindigen op vas- 
te adressen en andere op variabele. 

Zo zal het programmagebied altijd starten op 
16509, maar het daaropvolgende gebied (dis- 
play-file) begint ор een lokatie, die afhankelijk 
is van de lengte van het programma. 

De symbooladressen liggen op vaste plaatsen in 
het ”systeem-variabelen”-gebied van het geheu- 
gen, zodat de 2Х81 ze steeds zeer snel Кап te- 
rugvinden, Een volledige lijst van deze (еп an- 
dere) vaste plaatsen vindt u in hoofdstuk 28 van 
de ZX81-handleiding. 

Het gebruik van dit soort geheugenlokatics is 
eenvoudig, maar u moet wél eerst wennen aan 
het feit dat twee geheugenlokaties worden ge- 
bruikt voor het opslaan van het adres van één 
andere geheugenlokatie! Zo wordt de systeem- 
variabele "D-FILE” opgehorgen op de geheu- 
genplaatsen 16396 en 16397, In deze twee loka- 
ties bevindt zich het adres van de geheugen- 
plaats waarin het begin van de beeldinformatie 
is opgeslagen. 

U moet wel voor ogen houden, dat BASIC een 
begrip als ”D-FILE” niet verstaat. Wilt u toe- 
gang tot deze informatie, dan moet u met adres- 
sen werken. 
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Het manipuleren met geheugenlokaties 
“PEEK” en ”POKE” zijn de twee BASIC-in- 
strukties, waarmee we toegang krijgen tot de ge- 
heugenlokaties. De funktie: 


PEEK ADRES 


roept de inhoud van de geheugenplaats met het 
betreffende adresnummer op, en 


PEEK ADRES, WAARDE 


slaat de gegeven “waarde” op in de geheugen- 
plaats die is gedefinieerd door het gegeven 
adresnummer. 

Іп ёёп geheugenlokatie kunnen getallen tussen 
Den 255 worden opgeslagen. Het adres van een 
ZX81 geheugenplaats kan liggen tussen 0 en 
65534! Om dus één adres te kunnen opslaan, 
hebben we twee geheugenplaatsen nodig, 

We hoeven ons niet te verdiepen in de vrij inge- 
wikkelde binaire rekenwijze, waarmee de com- 
puter dit soort opdrachten uitvoert. Dat maakt 
het programmeren maar nodeloos gecompli- 
ceerd! Hoe alles in zijn werk gaat, kunnen we 
net zo goed verklaren aan de hand van de be- 
kende decimale getallenindeling, die ook in 
programmaregels wordt gebruikt. 

Zoals reeds gezegd, kan één geheugenplaats (of 
byte) getallen tot en met 255 opslaan. In één en- 
kele geheugenplaats kunnen we dus tellen van 0 
tot en met 255. Het eerstvolgende getal 256 past 
niet meer in die plaats, dus moeten we de twee- 
de geheugenlokatie te hulp roepen. Door daar 
een 1 in te zetten, geven we aan dat de eerste 
geheugenplaats één maal is volgeteld. Nadien 
kunnen we rustig verder gaan met voor de 
tweede maal de eerste geheugenplaats vol te tel- 
len (startend vanaf 0). De tweede geheugen- 
plaats wordt dus gebruikt om te tellen hoc vaak 
de eerste is volgeteld met 256 getallen. De eer- 
ste geheugenplaats, die de eenheden telt, wordt 
“least significant byte, LSB” genoemd. de minst 
belangrijke dus. De tweede geheugenplaats, die 
veelvouden van 256 telt, wordt "most signifi- 
cant byte, MSB” ofte wel de meest belangrijke 
genoemd. 


eerste geheugenplaats 
telt eenheden 


tweede geheugenplaats 
telt veelvouden 


van 256 


LSB 


Het zal nu duidelijk zijn, hoe we het adres kun- 
nen reconstrueren uit de inhoud van twee ge- 
heugenlokaties. Door middel уап een ”РЕЕК” 
kunnen we de inhoud van de eerste oproepen, 
nadien tellen we hij deze waarde de met 256 
vermenigvuldigde inhoud van de tweede op. In 
de vorm van een BASIC-bevel: 


PEEK W +2554PEEKIM+1) 


Dit bevel roept de inhoud op van de twec ge- 
heugenlokaties, opgeslagen in de geheugen- 
plaatsen met de adressen ”M” en ”M + 1”. 

De omgekeerde bewerking gaat al even gemak- 
kelijk. Als u een bepaald getal in twee delen 
moet splitsen, omdat het langer is dan één byte 
(geheugenplaats), dan moet u eerst dat getal de- 
len door 256 en het resultaat van die deling in 
de MSB opslaan. De rest van de deling hoort 
thuis in de LSB. In de vorm van een BASIC- 
bevel: 


POKE М+1, INT(V/256) 
POKE M‚V-2568 INT(V/256) 


Dit kommando zal het getal ”У” opbergen іп 
de geheugenplaatsen ”M” en ”M + I”. 

Zowel PEEK” als ”РОКЕ” zullen we in de 
toekomst vaak toepassen. 


De overige geheugenplaatsen 

De diskussie over het adresseren van geheugen- 
plaatsen heeft ons even afgeleid van wat we aan 
het bespreken waren: de indeling van het ge- 
heugen, aan de hand van de ”memory map”. 
De ”calculator-stack” is het geheugengebied, 
waarin de machine tijdelijk de resultaten van 
berekeningen opslaat De omvang van deze 
zone variëert zelfs tijdens het uitwerken van een 
programma en is afhankelijk van de soort bere- 
kening. 

De ”machine-stack” heeft als bijzonderheid, 
dat niet is te achterhalen waar dit deel van het 
geheugen eindigt. Deze informatie wordt name- 
lijk bewaard in de "machine stack pointer” en is 
met behulp van BASIC niet toegankelijk. Dat is 
niet zo erg, want in dit deel van het geheugen 
wordt niets bewaard wat voor het programme- 
ren van belang is. 

De ”GOSUB-stack” wordt gebruikt voor het 
opslaan van het nummer van de programmare- 
gel, waarmee we via een ”RETURN”-bevel uit 


een subroutine terugkeren naar het hoofdpro- 
gramma, 

Het laatste deel van het geheugen is de zoge- 
noemde "free RAM”, met andere woorden, de 
vrije RAM-plaatsen, die ter beschikking van de 
programmeur staan. De ”systeem-variabele” 
”КАМТОР” wordt ingevuld op het adres van 
de hoogste RAM-lokatie, bij het inschakelen 
van de machine. Toch is het mogelijk de waar- 
de van de ”RAMTOP” te veranderen, als we 
bijvoorbeeld meer geheugenruimte voor specia- 
le toepassingen willen vrijhouden, Dat kunnen 
bijvoorbeeld subroutines in machinecode zijn. 
Dit wordt in hoofdstuk 10 behandeld. 


Een programma voor het testen van het geheu- 
gen 

Een goed voorbeeld hoe we met de systeem-va- 
riabelen kunnen omgaan is het volgende pro- 
gramma voor het testen van de werking van het 
geheugen. 

Het ligt voor de hand dat we de werking van 
een geheugenplaats kunnen kontroleren door er 
eerst “iets” in op te slaan, daarna dit gegeven 
uit te lezen en vervolgens te kijken of er ver- 
schillen zijn ontstaan tussen in- en uitgelezen 
informatie. 

Het prohleem is dat ”iets” zo te bepalen dat we 
er zeker van zijn dat het testprogramma werkt. 
Dat is niet zo eenvoudig, want defekte geheu- 
genlokaties kunnen bepaalde informatie fout- 
loos verwerken en weer vrijgeven, terwijl ande- 
re informatic niet of met fouten wordt verwerkt. 


Een mogelijkheid is gebruik te maken van de 
toevalsfuncties van de 2Х81, waarmee we een 
willekeurige en uiteenlopende reeks getallen 
kunnen opwekken, Het geheugentestprogram- 
ma moet dus een willekeurig getal opslaan in de 
eerste vrije RAM-lokatie, dit getal uitlezen en 
vergelijken met de ingelezen waarde. 

Dit proces moet worden herhaald voor iedere 
plaats in de "free RAM”-zone van het geheu- 
gen. Het zal duidelijk zijn, dat we alleen maar 
de "free RAM”-zone kunnen testen. Het invoe- 
ren van willekeurige gegevens in andere delen 
van het geheugen zou namelijk het programma, 
dat immers ook ergens in het geheugen staat, 
beschadigen! 

Het omzetten van het principe in een door de 
computer te begrijpen aantal BASIC-regels is 
niet zo moeilijk. 
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10 PRINT "+"; 

20 LET E=PEEK 16386+2543FEEK 16587 -40 
30 LET M=PEEK 16412+2568PEEK 16413 +20 
40 LET нн 

50 IF МЕ THEN 6010 16 

50 LET R=INT(RND$254) 

76 РКЕ M,R 

80 IF PEEK(M)=R THEN GOTO 40 

99 PRINT “FOUT IN “tj” VERWACHT ";R 
100 PRINT “GELEZEN ";PEEK М 

116 GOTO 40 


Het programma start met het printen van een 
”+”-symbool op het scherm (regel 10), zodat 
we weten dat het programma loopt, Nadien be- 
palen we door middel van de regels 20 en 30 
waar de vrije RAM-zone zich bevindt. We vul- 
len de variabele "E" in op het adres van de laat- 
ste vrije byte, door het "РЕЕК?-еп van de loka- 
ties "ERR-SP” (het begin van de "GOSUB- 
stack”) en daarvan 40 af te trekken om vol- 
doende ruimte te houden voor de ”тасһіпе- 
stack”, We weten immers dat we met BASIC 
nooit de juiste plaats van het einde van deze 
stack kunnen terugvinden! 

Nadien vullen we de variabele grootheid ”M” 
in op het adres van de eerste byte van de vrije 
RAM-zone, door het ”РЕЕК”-еп van de 
*STKEND”-lokaties (het einde van de caleula- 
tor-stack) en daarbij 20 op te tellen. In principe 
lijkt het overbodig een extra ruimte van 20 
bytes aan te houden, omdat ”STKEND” exact 
het begin van de vrije zone aangeeft, De com- 
puter moet echter bij het uitvoeren van dit pro- 
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gramma есп aantal herekeningen maken, waar- 
door het kan gebeuren dat de ”calculator-stack” 
breder wordt en dank zij deze 20 extra bytes 
kan dat zonder problemen. 

De kommando’s in de regels 40 tot en met 80 
zorgen voor het achter elkaar testen van alle lo- 
katies in de vrije zone. Regel 60 wekt een wille- 
keurig getal op. hetgeen door regel 70 wordt op- 
geslagen in de byte, die wordt getest. Met regel 
80 roepen we de informatie terug en vergelijken 
deze met de originele "R”-waarde. Als "PEEK 
(M)” gelijk is aan ”R”, wordt in regel 40 door 
middel уап een “GOTO” de waarde van de va- 
riabele "M” met één eenheid verhoogd. Zou er 
een fout worden aangetroffen (“PEEK (М)” is 
dan niet gelijk aan ”R”), dan wordt er een fout- 
melding geprint met behulp van de regels 90 en 
100, waarna het testen gewoon doorgaat. 

Als alle vrije ruimte is getest, wordt ”M” gelijk 
aan ”Е” en print regel 50 een tweede plusje op 
het scherm. 

Het testprogramma start vervolgens opnieuw en 
doorloopt voor de tweede keer alle vrije geheu- 
genplaatsen. 

Tijdens het uitdraaien van het programma zou 
u kunnen denken dat er iets fout is gegaan om- 
dat er maar één plusteken op het scherm ver- 
schijnt. Toch hoeft dat niet te betekenen dat er 
iets niet in orde is, het duurt namelijk meer dan 
een half uur alvorens de computer alle vrije 
plaatsen heeft gekontroleerd! 

Dit simpele voorbeeld maakt ons attent op een 
van de problemen bij het het schrijven van gro- 
te programma’s op de 2Х81: de snelheid! 


3. PROGRAMMA-UTILITIES 


Een “utility” (letterlijk vertaald een nuttigheid- 
Је) is in het algemeen een programma dat ge- 
bruikt kan worden bij het schrijven van andere 
programma’s. 

Zo zou u de in het vorige hoofdstuk beschreven 
geheugentest als een ”utility” kunnen beschou- 
wen, omdat het de machine controleert alvorens 
u programma’s gaat intoetsen. 


Nu we de beschikking hebben over 16K aan ge- 
heugen-ruimte en we ons geen zorgen hoeven te 
maken of onze programma’s wel in het geheu- 
gen passen, kunnen we een deel van deze capa- 
citeit reserveren voor het opslaan van “utili- 
ties”, die goed van pas komen bij het intoetsen 
van grotere programma’s, 

Zo kan het tijdens het invoeren van program- 
ma’s wel eens nodig zijn te weten hoeveel ge- 
heugen er nog vrij is en hoe de computer alle 
informatie in zijn geheugen heeft verwerkt. Met 
onze kennis van de geheugenindeling en de sys- 
teemvariabelen kunnen we zo’n programma 
schrijven, maar we zullen hiervoor tamelijk in- 
gewikkelde technieken moeten toepassen, Het 
zou ons niet verbazen als u op dit moment de 
uitleg laat voor wat hij waard is en gewoon de 
“utility” in praktijk gaat brengen. Dit geldt 
trouwens voor alle in dit hoofdstuk beschreven 
hulpprogramma's, 

Na meer praktijkervaring, kunt u altijd naar dit 
hoofdstuk teruggrijpen om de fijne kneepjes 
van de ”utility”-programma’s te ontdekken, 


De drie in dit hoofdstuk beschreven hulppro- 
gramma’s zijn zo genummerd (in het 9000-ge- 
bied) dat ze steeds achter een programma kun- 
nen worden opgenomen. Bovendien gebruiken 
we voor iedere “utility” een andere set regel- 
nummers, zodat ze alle drie gezamenlijk kun- 
nen worden ingevoerd en door middel van 
*GOTO”-s afzonderlijk kunnen worden opge- 
roepen. In hoofdstuk 5 wordt een methode be- 
schreven, waarmee deze programma’s zo kun- 
nen worden georganiseerd, dat ze in een 
hoofdprogramma kunnen worden geïntegreerd. 


“Utility” nummer 1: geheugengebruik 
Deze utility, waarmee we het gebruik van het 
geheugen kunnen kontroleren, is een tamelijk 
kort hulpprogramma dat we praktisch bij ieder 
hoofdprogramma kunnen gebruiken: 


9200 PRINT “PROGRAMMA “;FEEK 183954256 РЕЕК 
15397-16509 

9210 PRINT "BEELDSCHERM “;PEEK 15490+255$РЕЕК 
15401-РЕЕК 1859-25ЬІРЕЕК 15597 

9220 PRINT “VARIABELEN ";PEEK 15404425541 
PEEK 16405-PEEK 16400-2553PEEK 15401 

9256 PRINT “VRIJ GEHEUGEN *;PEEK 153B6+25b4PEEK 
16387-PEEK 16412-2564РЕЕК 15415 

2240 STOP 


U kunt dit programma het best vanaf audio- 
tape in het geheugen laden, alvorens u het echte 
programma gaat schrijven. De nog vrije geheu- 
genruimte kan op ieder gewenst moment zicht- 
baar worden gemaakt door regel "GOTO 9200” 
in te tikken. De hoeveelheid door een program- 
ma ingenomen geheugenruimte wordt bepaald 
door het verschil te berekenen tussen het adres 
van het begin van de programmaruimte, name- 
lijk 16509 en het adres van de laatste byte van 
de programmazone, opgeslagen in ”D-FILE” 
(16396 en 16397). Op dezelfde manier bereke- 
nen we de geheugenruimte, die in beslag wordt 
genomen door de variabele grootheden en door 
de schermbeeldinhoud. 

Dit hulpprogramma kreëert geen nieuwe varia- 
belen. 


Wél vraagt deze ”utility” wat ruimte in het pro- 
grammadeel van het geheugen. 

Het nog vrije deel van het geheugen wordt be- 
paald door het berekenen van het verschil tus- 
sen het adres, opgeslagen іп ”STKEND” en het 
adres in ”ERR-SP”. Dit systeem houdt dus 
geen rekening met de ruimte die door de ”ma- 
chine-stack” in beslag wordt genomen en het 
resultaat is bijgevolg 5 tot 10 plaatsen te hoog! 
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Utility” nummer 2: bet gebruik van variabelen 
Hoewel we met “utility” nummer 1 kunnen be- 
rekenen hoeveel geheugenruimte er door de va- 
riabelen wordt bezet, hebben we met dat hulp- 
programma nog geen overzicht van de 
verdeling van die geheugenruimte tussen de 
verschillende variabelen. 

Vaak komt het bij het schrijven van zeer inge- 
wikkelde programma’s voor dat men vergeet 
welke variabelen er al in gebruik zijn. U loopt 
dus het risico dezelfde naam voor verschillende 
variabelen in te voeren! 

Met de in deze paragraaf beschreven “utility” 
kunt u op ieder gewenst moment een volledig 
overzicht krijgen over alle reeds gebruikte va- 
riabelen. 

Het programma bekijkt het variabelengebied 
van het geheugen en maakt een lijstje met de 
naam, soort en momentele waarde (zo die aan- 
wezig is) van alle gevonden variabelen, 

Het is, met alles wat we ondertussen aan de 
weet zijn gekomen over de indeling van het ge- 
heugen, niet zo moeilijk om start- en eindpunt 
van het variabelengebied terug te vinden. Veel 
ingewikkelder wordt het, als we de in het ge- 
heugen gevonden informatie op de beschreven 
manier willen gaan interpreteren. Daarvoor 
moeten we eerst dieper ingaan op de wijze 
waarop de computer variabelen opslaat in zijn 
geheugen, 

De 2Х81 herkent zes verschillende soorten va- 
riabelen. hoewel de menselijke gebruiker van 
het apparaat soms niet in slaat is de verschillen 
te ontdekken. leder type variabele eist een ei- 
gen specifieke geheugenruimte op voor het op- 
slaan van de waarde en overige relevante infor- 
matie, Wat ze echter allemaal met elkaar 
gemeen hebben, is dat de eerste geheugenplaats 
wordt gebruikt om het soort variabele te identi- 
ficeren. Om ruimte uit te sparen wordt deze eer- 
ste geheugenlokatie ook gebruikt om de eerste 
en zo mogelijk enige, letter van de naam van de 
variabele in op te slaan. Een en ander gaat vrij 
eenvoudig, 

Zoals we weten, moet een variabele grootheid 
door een LETTER worden voorgesteld. Omdat 
er slechts 26 letters bestaan, kunnen we de 
naam van de grootheid voorstellen door een ge- 
tal tussen 1 en 26, Daarnaast onderscheidt de 
computer slechts zes soorten van variabelen, zo- 
dat ook deze indeling vrij simpel kan worden 
gecodeerd. 
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soort van variabele 


string met willekeurige lengte 
eenvoudige variabele (één-letterig) 
nummer-array 

langer-dan-een-letter variabele 
symbolen-array 

index-vaniabele, gebruikt іп "FOR" Jus 


Beide delen van de informatie (type en naam) 
hebben slechts een beperkte omvang, daarom 
kunnen ze zonder problemen in één byte wor- 
den ondergebracht. 

Dat gaat als volgt: de drie meest belangrijke 
bits van de byte worden gebruikt voor het op- 
slaan van de typecode en de vijf resterende 
minst belangrijke bits worden gebruikt voor het 
bewaren van de letter van de naam van de va- 
Labele, 


Dus: geheugenplaats 
byte 
—nTy 
bit TeS 4 3 2 1-0 
TTTLLLE LE 


type letter 


Als "VO" het adres is van de eerste geheugenlo- 
katie van een variabele, dan kunnen we door 
het toepassen van de volgende regels type- en 
letter-informatie van elkaar scheiden: 


TO=INT (PEEK (VO) /32) 
C$-CHRS(PEEK (VG) Të 32422) 


waarin ”Т0” het type aangeeft en “CS” de let- 
ter. 

Het gebruiken van de eerste lokatie voor het 
opslaan van deze gegevens is zeer verstandig, 
want door het onderzoeken van de eerste ge- 
heugenlokatie weten we wat voor soort variabe- 
le op een bepaalde plaats van het geheugen is 
opgeslagen en weten we bijgevolg ook hoe we 
er verder mee moeten omgaan. 

Dit principe wordt in onderstaande 
toegepast: 


“utility” 


9300 LET VO=PEEK 16400+2564РЕЕК 16401 

9310 PRINT "VARIABELE"; TAB{10); "ТУРЕ"; 
TAB(20)5 "WAARDE" 

9320 DIM C$(10) 


rn 


9520 IF PEEK(Vë}=128 THEN STOP 

9240 LET Të DI {PEEK (У0)/52) 

9350 LET 18=1 

9350 LET ëch 

9379 LET C8(1@)=CHRS (PEEK (У0)-70452-32) 


9586 IF Тбе2 THEN GOTO 9450 

9390 IF T0@(>5 THEN GOTO 9489 

9400 LET Уд-041 

9419 LET ТӨЗІНТІРЕЕКІУ0) /54) 

9420 LET 191051 

9430 LET ($ (16}=СНА${РЕЕК (У6)-Т04Ь4) 
9448 IF Тд=9 THEN БОТО 9490 

9450 PRINT C$; ТАВ (20) ;VAL C$ 

9800 LET VO=V0+6 

9470 БОТО 9330 


9480 IF T0<>7 THEN GOTO 9520 

9490 PRINT (6; TAB (19); "INDEX"; TAB (20) ;VAL C$ 
9500 LET У0-У0-ІВ 

9519 GOTO 9330 


9528 IF 16452 THEN GOTO 9619 

9539 LET 18-1041 

9540 LET TO=PEEK (+1) 425G8PEEK (V0+2) 
9450 LET C$(2)="6" 

9540 PRINT C$; TAB(1@) ; "LEN"; TO; TAB (20) ; 
9570 LET VO=VO+3 

9580 IF Тб-0 THEN PRINT 

2590 IF Te=@ THEN GOTO 9230 


9608 PRINT СНА$ (РЕЕК (VO) ; 
9619 LET Vë) 

9620 LET Т@=Т@-1 

9859 GOTO 9589 


9640 ІР T0=6 THEN LET C$ (2)="$" 

9650 LET 19=8 

2460 PRINT Ces TABIO); "DIMI"; 

9670 PRINT PEEK (VO+4+1 0k?) +2568PEEK 0541022); 
9688 LET 10=10+1 

9690 IF IN 9PEEK(VO+3) THEN PRINT”, "5 

9700 IF 18<PEEK(VO+3) THEN 5070 9674 

9710 LET VO=VO+S+PEEK (VO+1) +254 PEEK (00 +2) 
9720 PRINT *)* 

9738 GOTO 9330 


Met regel 9300 wordt "NO" gelijk gemaakt aan 
het adres van de startbyte van het variabelenge- 
bied van het geheugen. Door middel van de re- 


gels 9340 en 9370 wordt de variabele opgesplitst 
in ”T0” (type) en "CH (1)” (eerste letter van de 
naam). Wat er vervolgens gebeurt, is afhanke- 
lijk van het soort variabele, dus van de cijferin- 
houd van ”Т0”. 


Als TO gelijk is aan drie, hebben we te maken 
met een eenvoudige variabele. Regel 9380 kijkt 
of dit het geval is en is bet antwoord bevesti- 
gend, dan stuurt een “GOTO” de computer 
naar regel 9450. De naam en de waarde van de 
variabele worden geprint. 

Het printen van de naam is simpel, want deze 
staat immers in “C$”. Het uitschrijven van de 
waarde kan alleen maar door gebruik te maken 
van de functie ”УАТ”. Deze typische BASIC- 
functie is zo nuttig dat het de moeite waard is ze 
te kunnen toepassen. Met een ”VAL”-instruktie 
kunnen we immers een bepaalde wiskundige 
uitdrukking in een ”stringvariabele” uitwerken. 
Als we er aan denken dat de naam van een en- 
kele variabele een speciale vorm van een wis- 
kundige uitdrukking is, ligt het voor de hand 
dat de notatie "PRINT VAL C$” niets anders 
zal doen dan de inhoud van de variabele die in 
”С$” zit uit te printen, En dat is nu net wat we 
wilden! 

Nadat deze informatie op het scherm is gezet, 
moeten we er voor zorgen dat de inhoud van 
”У0” zo wordt aangepast, dat er nu het adres 
van de eerste lokatie van de volgende variabele 
in komt te staan, Als we ons even voor de geest 
halen dat een eenvoudige variabele vijf geheu- 
gen-plaatsen inneemt (zie ook de ZX81 hand- 
leiding, pagina 172), dan zal het duidelijk zijn 
dat regel 9460 ”У0” gelijk maakt aan het adres 
van de eerste lokatie van de eerstvolgende va- 
riabele. 


Als "TO" gelijk is aan vijf, dan volgt uit de gege- 
geven tabel, dat we te maken hebben met een 
numerieke variabele met cen naam. die langer 
is dan één letter. 

Nu we het probleem van het printen van de in- 
houd van een numerieke vanabele, waarvan we 
de naam kennen, hebben opgelost, worden we 
als enig extra probleem geconfronteerd met het 
opbouwen van de volledige naam uit de groot- 
heid ”С$”. Daarvoor schakelen we de regels 
9400 tot en met 9440 in. 

leder aanvullend symbool van de naam van de 
variabele wordt door regel 9430 afgezonderd, 
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samen met een nieuwe waarde van de typecode 
“FO” (regel 9410). De volledige naam van de 
variabele wordt opgebouwd door ieder nieuw 
symbool toe te voegen aan "CH". Het laatste 
symbool van de naam wordt gedetecteerd door 
het feit dat ”T0” niet gelijk is aan nul. 

Nadat het laatste symbool is afgezonderd, kun- 
nen we de gegevens printen en de waarde van 
"VO" ор dezelfde wijze aanpassen, als bij een 
eenvoudige variahele is heschreven. 


Als ”TO” gelijk is aan zeven, hebben we te ma- 
Кеп met een index-variabele. Het enige verschil 
tussen zo’n grootheid en een eenvoudige varia- 
bele is dat een index liefst 18 geheugenlokaties 
nodig heeft voor het opbergen van zijn momen- 
tele waarde. U moet, na de vorige uitleg, in 
staat zijn te beredeneren hoe we door middel 
van de instrukties in de regels 9490 en 9500 dit 
soort variabele behandelen. 


Als "ТО? gelijk is aan twee, krijgen we een 
“string” voorgeschoteld, Omdat de naam van 
een “string” per definitie slechts één letter lang 
kan zijn, hoeven we alleen een ”$”-symbool aan 
de inhoud van ”C$” toe te voegen, hetgeen ge- 
beurt in regel 9550, 

Helaas kunnen we geen beroep doen op de 
*VAL”-functie voor het printen van de momen- 
tele waarde van de variabele. Deze funktie kan 
immers alleen wiskundige uitdrukkingen aan! 
De lengte van de “string” wordt іп de twee ge- 
heugenlokaties opgeslagen, die volgen op de 
naam. 


geheugenlokatie 
| 1 ү 4 5 с... lengte + 3 
naam | lengte | string 


Als we deze twee plaatsen gaan "РЕЕК”-еп (re- 
gel 9450), kunnen we de lengte van de “string” 
printen door middel van regel 9560. Met deze 
informatie kunnen we nadien ieder symbool 
van de “string” “РЕЕК”-еп en door de 
“CHRS$”-functie alles op het scherm schrijven. 
Als het aantal symbolen gelijk wordt aan de 
lengte van de “string” weten we dat we klaar 
zijn (regels 9580 en 9590). 


Een ”TQ”-waarde van vier komt overeen met 


een nummer-array, een “TO”-waarde van zes 
duidt aan dat we te maken hebben met een 
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symbolen-array. Het enige verschil in behande- 
ling is dat een ”$”-symbool aan de enkele letter 
wordt toegevoegd іп het geval van een ”string- 
array” (regel 9640). 
Het heeft geen enkele zin de momentele waarde 
van dit soort variabelen op het scherm te zetten. 
Het resultaat zou cen overvloed aan informatie 
zijn, waardoor het gewenste overzicht verloren 
zou gaan. Zinvoller lijkt het in dit geval de di- 
mensies van de “string” op het scherm te zetten, 
Dan moeten we wel eerst bekijken hoe de ZX81 
“аттау” in zijn geheugen opslaat. 
Uit hoofdstuk 27 van de handleiding van de 
machine volgt dat de vierde byte het nummer 
van de “array” bewaart. 

De afmeting (dimensie) van een array wordt 
opgeslagen in twee bytes. 


Bytes 
1 25253 4 5 6 18 
naam | lengte | nr. van | Iste dim.| 2de dim] 


array 


Door het ”РЕЕК”-еп van de inhoud van de 
vierde byte kunnen we vaststellen of de afme- 
tingen van alle array’s zijn uitgeprint, regel 9690 
en 9700. De afmeting van het array volgt uit re- 
gel 9670 en het aantal wordt in de grootheid 
710” opgeslagen door regel 9680. 

Nadat we al deze informatie op het scherm heb- 
ben gezet, wordt de inhoud van "NO aange- 
past, De adreswaarde van de eerstvolgende va- 
riahele verschijnt in “VO” door bij de 
oorspronkelijke waarde de inhoud van de twee- 
de en derde byte op te tellen. Deze plaatsen be- 
vatten immers de totale lengte van het array. 


Er blijven nu slechts twee feiten te verklaren. 
Op de eerste plaats moet het programma op de 
een of andere manier te weten komen, of alle 
variabelen aan de beurt zijn geweest. Dat is 
geen punt, de laatste geheugenplaats uit het va- 
riabelengebied bevat immers de waarde 128 en 
dit kunnen we dus zeer eenvoudig kontroleren 
door regel 9330, 

Op de tweede plaats zouden we ons kunnen af- 
vragen, waarom we voor “C$” een “DIM” kie- 
zen en geen “string”, terwijl dit laatste toch veel 
eenvoudiger zou zijn. Welnu, een “string” kan 
de hoeveelheid voor zichzelf noodzakelijke ge- 
heugenruimte wijzigen gedurende het uitwer- 
ken van een programma. Zouden we in dit 


hulpprogramma een “string” gebruiken, dan 
zou het variahelengebied van het geheugen tel- 
kens als de “string” van lengte zou veranderen 
opnieuw worden gerangschikt, hetgeen natuur- 
lijk desastreus is voor een programma waarmee 
we juist de inhoud van dit geheugendeel willen 
analyseren! 

Waarschijnlijk vindt u deze ”utility” tamelijk 
moeilijk om te begrijpen. Analyse van ieder 
zelfstandig onderdeel zal hopelijk wat licht in 
de duisternis werpen. 

Als dat bij u nog niet het geval is, mag dat geen 
reden zijn om geen gebruik te maken van dit 
zeer nuttige programma. 

Hier volgt een deel van een programma en de 
manier waarop deze “utility” de gebruikte va- 
riabelen in tabelvorm verwerkt. 


1 LET A=f08 

2 LET MAX=00120 

3 LET A$="MIKE" 

4 FOR I=] 705 

5 DIM 201,7,9) 
. 


VARIABELE TYPE WAARDE 
A 106 
МАХ 120 

A$ LEN=4 MIKE 

I INDEX 1 


І DIN(,7,9) 


“Utility” nummer 3: het hernummeren 

De derde en laatste “utility” die we gaan be- 
spreken is ook weer een vrij kort programma, 
waarmee we de nummering van de regels uit 
een programma kunnen aanpassen. 

In de praktijk komt het bijna nooit voor dat we 
een lang programma in één keer zonder sys- 
teemfouten in de computer tikken. 


Er gaat altijd wel iets mis en dan moeten we ex- 
tra regels tussenvoegen, waardoor de numme- 
ring van de regels niet meer klopt. Het zou dus 
erg handig zijn, als we konden beschikken over 
een programma dat automatisch alle regels van 
het foutloze programma kan hernummeren. 

Dat is echter niet zo eenvoudig in BASIC te 
programmeren. Niet alleen moeten alle regels 


nieuwe nummers krijgen (dat zou nog wel te 
doen zijn} maar bovendien moet iedere 
”GOTO”- of ”GOSUB”-instruktie worden aan- 
gepast aan de nieuwe nummering. Zou men dat 
niet doen, dan zouden de oude regelnummers 
in de ”GOTO”- en “GOSUB”-bevelen naar 
volkomen foute instrukties verwijzen en het 
programma zou niet werken. 

Natuurlijk is ook dat te programmeren, maar 
de “utility?” wordt dan zo lang, dat het nauwe- 
lijks nog de naam ”hulpprogramma” verdient! 
Vandaar het volgende compromis: we maken 
een hulpprogramma, dat alle regels van een 
nieuwe logische nummering voorziet, maar de 
regelnummers achter de "GOTO”- en ”СО- 
SUB”-instrukties ongewijzigd laat. Het pro- 
gramma stelt dan een tabel op, waarin de oude 
en nieuwe regelnummers met elkaar worden 
vergeleken. 

Aan de hand van deze tabel en met behulp van 
de "EDIT”-instruktie kunnen we vrij snel alle 
”GOTO”- en ”GOSUB”-commando’s aanpas- 
sen, 

Alvorens we de werking van het programma 
kunnen hegrijpen, is het noodzakelijk even wat 
informatie te geven over de manier waarop de 
machine BASIC-instrukties in het programma- 
gedeelte van het geheugen opslaat. 

Uit hoofdstuk 27 van de handleiding kunnen 
we de volgende gegevens afleiden: 


2 bytes | 2 bytes tekst 


regelnr. tekstlengte 
+ nieuwe regel 


nieuwe-regel 


Hieruit blijkt, dat de twee eerste geheugenloka- 
ties de gegevens over het nummeren van de re- 
gels bevatten. Opmerkenswaard is wel, dat het 
regelnummer met het meest beduidende bit 
(cijfer) in het eerste byte wordt opgeslagen, dus 
tegengesteld aan alles wat we tot nu toe over het 
opslaan van getallen groter dan 256 hebben ge- 
leerd! 

Vandaar dat we onderstaande ”PEEK”-instruk- 
tie moeten gebruiken: 


2564РЕЕК VO + PEEK (у@+1) 


waarbij "VO" het adres van de eerste geheugen- 
lokatie bevat, Als we het regelnummer een an- 
dere waarde willen geven, moeten we de twee 
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lokaties ”РОКЕ”-еп met de nieuwe gegevens. 
We zullen in de eerste plaats rekening moeten 
houden met de beperkte opslag-capaciteit van 
een byte en getallen groter dan 256 moeten op- 
splitsen in twee delen: 


hoogstwaardige byte = INT(S0/258) 
en 


laagstwaardige byte = 56-2564INT (80/25) 


waarbij ”50” staat voor het nieuwe regelnum- 
mer. 

Na het ”РОКЕ”-ей van het nieuwe regelnum- 
mer moeten we naar de volgende regel verhui- 
zen. Dat kan, door de derde en vierde geheu- 
genlokatie te ”РЕЕК”-сп (deze plaatsen 
bevatten de informatie over de lengte van de re- 
gel) en deze gegevens op te tellen bij de origine- 
le "NO waarde. 

We zijn nu rijp om geconfronteerd te worden 
met het programma van “utility” nummer 3! 


9800 LET VO=16509 

9819 PRINT "START="; 

9820 INPUT 56 

9830 PRINT 50 

9840 PRINT "STAP=*; 

9850 INPUT 10 

9840 PRINT 10 

9870 PRINT 

9880 PRINT “DUD*; TAB(6) ; "NIEUW" 

9890 LET LO=2563PEEK VO + PEEK (941) 

9908 IF 192-9000 THEN STOP 

9919 PRINT LO; TAR (6) ;50 

9920 POKE VO, INT (50/250) 

9930 POKE Vari, 50-2568 INT (56/256) 

9949 LET 56-50-10 

9950 LET V0=V0+4+PEEK (VO+2) +25 PEEK (VO 
+3) 

9960 GOTO 9899 


Met regel 9800 maken we "VO" gelijk aan het 
adres van de cerste byte van het programmage- 
bied uit het gcheugen. 

Nadien stellen we het getal vast, waarmee het 
hernummeren moet beginnen (”S0”) en ook de 
stap-grootte tussen iedere regel (“10”), Een en 
ander gebeurt aan de hand van de regels 9810 
tot en met 9870, Regel 9890 berekent het mo- 
mentele regelgetal "LO". 
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Deze grootheid wordt samen met het nieuwe re- 
gelnummer uitgeschreven onder bevel van regel 
9910, 

Nadien wordt het nieuwe regelnummer door 
middel van twee ”POKE”-instrukties in de juis- 
te bytes ingeschreven (regels 9920 en 9930). De 
grootheid "SO" wordt vermeerderd met de ge- 
kozen stap-grootte ”10” (regel 9940) en met de 
volgende regel maakt men ”VO” gelijk aan het 
adres van de eerste byte van de volgende in- 
struktieregel. 

Het programma stopt als "LO" gelijk wordt aan 
9000. Het heeft immers geen enkele zin de re- 
gelnummers van deze of een van de twee ande- 
те “utility’s” te gaan hernummeren! 

Alvorens u deze “utility” op gelijk welk pro- 
gramma kunt loslaten, moet u wel twee gege- 
vens intoetsen. Het nieuwe nummer van de eer- 
ste regel (meestal 10) en de gewenste stap- 
grootte tussen de regels (meestal ook 10). Het 
eerste gegeven wordt ingetoetst, nadat de mede- 
deling "START" ор het scherm verschijnt, de 
tweede informatie wordt verwacht na de bood- 
schap STEP", 

Een voorbeeld van het resultaat van deze ”utili- 
ty”: 


START=18 
DC ell) 

DU NIEUW 
Ja 10 

п 2 

J % 

15 4 

а 50 


Naast het feit dat dit eenvoudige hernumme- 
ringsprogramma erg nuttig is, kan het ook de 
basis vormen voor een meer geavanceerd her- 
nummeringsprogramma. U kunt het bijvoor- 
beeld zo aanpassen. dat alleen maar een he- 
paald gedeelte van het programma onder 
handen wordt genomen, of u kunt proberen het 
moeilijke probleem van de ”GOSUB”- en 
”GOTO” -instrukties ermee te vereenvoudigen! 


4. GRAFISCHE MOGELIJKHEDEN MET 16K 


Het ter beschikking hebben van veel meer ge- 
heugenruimte heeft grote gevolgen op de ma- 
nier waarop men grafische voorstellingen op de 
ZX81 kan programmeren. 

Een van de meest voor de hand liggende voor- 
delen is dat men het volledige scherm kan in- 
schakelen, zonder dat men het gevaar loopt dat 
het geheugen overloopt. Een volledig gebruikt 
scherm kost ongeveer 700 geheugenplaatsen. 
Het is duidelijk dat er in de 1K-uitvoering dan 
niet zo erg veel geheugenruimte meer overblijft! 
Daarnaast zal blijken dat de 16K-machine op 
een geheel andere manier omgaat met de beeld- 
mogelijkheden dan de 1K-uitvoering en dat we 
dit feit kunnen gebruiken om door middel van 
vrij geavanceerde programmeertechnieken vrij 
ingewikkelde grafische voorstellingen te kun- 
nen tekenen. 


Een duikbootspelletje 

Dit spel is tamelijk eenvoudig. Er worden twee 
schepen op het scherm getekend, een opper- 
vlakteschip еп een onderzeeer. Het oppervlak- 
teschip kan dieptebommen lanceren en het is de 
bedoeling dat we met zo weinig mogelijk bom- 
men proberen de onderzeeër te vernietigen. 

De ideeën achter het programma zijn recht-toe- 
recht-aan. 

De twee schepen worden op het scherm geprint 
door eerst op een bepaalde plaats een vorm te 
tekenen, nadien deze vorm uit te wissen om het 
symbool op een iets afwijkende plaats opnieuw 
te tekenen. 

Omdat de schepen zich uiteraard horizontaal en 
zelfs rechtlijnig voortbewegen, kan het pro- 
gramma worden vereenvoudigd door de vol- 
gende truuk. 


10 FOR X=¢ TD 38 
20 PRINT АТ 3,¥z" 1"; 
30 NEXT X 


We zien een sterretje dat van links naar rechts 
over de bovenste helft van het scherm “loopt”. 
Door het symbool op te bouwen uit de combi- 
natie van een spatie en een sterretje en de posi- 


tie van dit symbool op het scherm te variëren 
door het laten stijgen van de waarde van de 
grootheid ”Х”, ontstaat een bewegend beeld. 
Bij iedere nieuwe ”PRINT” wordt de oude po- 
sitie van het sterretje immers ingenomen door 
de spatic! 

Deze techniek kunnen we bijna altijd gebrui- 
ken. Het enige waarop we moeten letten is dat 
er zieh rondom het symbool voldoende spaties 
bevinden om ervan verzekerd te zijn dat het 
oude symbool volledig door spaties wordt ver- 
vangen bij de nieuwe ”PRINT”-instruktie. 
Moeilijker wordt het als het objekt zich niet 
rechtlijnig voortbeweegt, In het later in dit 
hoofdstuk te behandelen ”squash”’-programma 
maken we ook van deze truuk gebruik. 


Er mocten nu nog twee problemen worden op- 
gelost: hoe kunnen we vaststellen of de duik- 
boot is geraakt en hoe kunnen we in zo’n geval 
een soort “explosie” laten plaatsvinden, waarna 
de duikboot van het scherm verdwijnt? Het vol- 
ledige programma luidt als volgt. 


18 LET МС=0 

20 LET НС=@ 

3@ LET Fee 

40 LET Hee 

50 LET 16-0 

60 GOSUB 406 

70 LET X=% 

ВФ LET YSeINT(RNDES) +15 

96 LET Y=2 
10% BOSUB 290 
11@ PRINT AT @,@;°TREFFERS="; HC; TAB (101; "MISSERS 

s=" МС 
120 IF F=0 THEN LET XD=2#X 
130 IF [=6 THEN LET YD=35 
140 JF INKEY$="F" AND F=0 THEN LET F=1 


159 IF F=1 THEN БОЗУВ 206 
168 5DSUB 400 

170 IF H=0 THEN БОТО 100 
196 DIS 500 

190 БОТО 36 
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260 PRINT AT Y,X;" [CAJC 2163153"; 

210 LET Хен 

228 IF (025 THEN LET 1-0 

258 IF X=0 THEN PRINT AT Y, 255" NI 
240 RETURN 


300 UNPLOT XD, Үр 

318 LET YD=YD-i 

320 PLOT XD, YD 

330 IF YD=2 THEN LET ME=MC+1 

349 IF YD=2 THEN LET Ech 

350 IF F=@ THEN UNPLOT XD, YD 

369 IF ABS(XD-28X5-4) > THEN RETURN 
370 IF 045-283 THEN RETURN 

380 LET H=l 

390 RETURN 


400 PRINT AT ¥5,X5;" CAMAJN"; 

418 LET XS=XS+RNO 

420 IF 15927 THEN LET 15-0 

430 IF 15-9 THEN PRINT AT Ү5,27;" En 
М9 RETURN 


909 LET НГ=НС+1 

518 FOR 1=1 Т0 20 

520 PRINT AT YS, (ër "CAILAILAILAI"; 
559 PRINT АТ YS, 45; * ч 

548 NEXT I 

950 RETURN 


509 CLS 
bið FOR 1-0 TD 31 


628 PRINT AT 2,1;"15]°; 
658 PRINT AT 21,1; "01% 
М8 NEXT I 
450 RETURN 


Daar waar grafische symbolen ingetoetst moe- 
ten worden, is dit in het programma aangege- 
ven met vierkante haakjes rond de te bedienen 
toetsen. Zo bedoelen we met [A] het grafische 
symbool van de A-toets en met [ | een omge- 
keerde spatie, dus een zwart vierkantje. Als u 
dus in dit en in de hieropvolgende programma’s 
een symbool tussen vierkante haakjes aantreft, 
dan moet u de computer in zijn ”grafiekstand” 
zetten. Niet vergeten eerst de ”shift”-toets in te 
drukken! 

In de regels 230. 430 en 530 moet u tussen de 
aanhalingstekens telkens 4 spaties intoetsen. 
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Hoe werkt dit programma? 

Het programma start met het op nul zetten van 
alle variabelen en het tekenen van de zeebodem 
en zeespiegel, met behulp van subroutine-600. 
De diepte, waarop de onderzeeër gaat varen, 
wordt door middel van een willekeurig getal in 
regel 80 vastgelegd. Nadien wordt het opper- 
vlakteschip door subroutine 200 getekend op 
positie "X, Y” en de onderzeeër door subrouti- 
пе 400 op de positie "XS, YS”. Beide schepen 
varen in dezelfde richting, De snelheid van de 
duikboot wordt door regel 410 op een willckeu- 
rige waarde vastgelegd. De dieptebom wordt 
gelanceerd op het moment dat de ”F”-toets 
wordt ingedrukt. Het al dan niet bedienen van 
deze toets wordt in regel 140 gecontroleerd door 
de "INKEY$”-functie, De variabele "E" wordt 
1 en de positie van de bom wordt in "XD, YD” 
opgeslagen. 

Door middel van subroutine 300 houdt het pro- 
gramma de positie van de bom in de gaten en 
zorgt er bovendien voor dat het projektiel blijft 
bewegen, 

We moeten wel bedenken dat de bom op het 
scherm wordt gezet door middel van ”PLOT/ 
UNPLOT”-instrukties en de schepen met 
“PRINT AT”-bevelen worden getekend. De 
coördinatensystemen kloppen dus пісі! Zoals 
we weten, verdeelt "PLOT" het scherm in 64 bij 
44 posities en werkt "PRINT AT” met 32 bij 22 
symboolplaatsen. Het zal duidelijk zijn, dat 
“XD” en “YD” het dubbele zijn van een gelijk- 
waardige waarde van "X” en ”Y”. Ook moeten 
we rekening houden met het feit dat de waarde 
van “YD” wordt gemeten vanaf de onderkant 
van het scherm en de waarde van ”Y” vanaf de 
bovenkant. Al met al is het dus met zo eenvou- 
dig om een systeem te verzinnen dat de coördi- 
naten van duikboot en dieptebom met elkaar 
kan vergelijken, 

Met hehulp van de regels 120 еп 130 worden de 
variabelen ”ХО” en “YD” gelijkgemaakt aan 
de coérdinaten van het oppervlakteschip, zodat 
de bom vanaf de momentele plaats van het 
schip wordt gelanceerd. Met de regels 360 en 
370 worden de coördinaten van de onderzeeër 
en van de bom met elkaar vergeleken. Het ver- 
gelijken van de X-coördinaten volgt na cen ver- 
menigvuldiging met twee. Voor het vergelijken 
van de Y-coördinaten moet men echter "2*YS” 
van 43 aftrekken. Over de overige programma- 
stappen is niet zo veel op te merken, het enige 


waar u in de toekomst misschien nog eens ge- 
bruik van kunt maken is de manier waarop de 
duikboot in de regels 510 tot en met 540 wordt 
“vernietigd”. 

In de figuur is te zien hoe de symbolen van dit 
spel op het scherm verschijnen, 


treffers =à missers =Ô 


mr mame: 


Squash 

Als tweede voorbeeld van een spel waarbij we, 
dankzij de 16K geheugenkapaciteit, het hele 
scherm kunnen gebruiken, geven we een volle- 
dig uitgewerkt programma voor het spelen van 
het zogenoemde ”squash”-balspel. 


18 LET BALL=@ 

Ж LET BALL=BALL +1 
38 CLS 

40 LET = 

50 LET Beld 

60 LET V=i 

70 LET Wei 

BO LET X=1¢ 

% LET Y=15 

100 GOSUB 500 

116 PRINT BALL 

129 GOSUB 200 

136 GOSUB 700 

140 GOSUB.30¢ 

156 IF BC>21 THEN 6070 126 
160 GOTO 22 


200 LET AS=INKEYS 

210 IF A$="5" THEN LET (53-1 
226 IF A$="B" THEN LET X=X+i 
230 RETURN 


3608 PRINT AT B,ñ;" "5 

316 LET AAW 

326 LET PBW 

330 IF А=31 OR AO THEN LET V=-V 
340 IF Bei THEN LET W=-W 

350 IF B+i=¥ THEN GOSUR 400 

368 PRINT AT BA; "1"; 

570 RETURN 


406 LET R=A-X 

410 IF HI OR R>3 THEN RETURN 
420 LET іні 

$30 RETURN 


500 FOR 1=6 Т0 31 

510 PRINT АТ 0,1; "01"; 
520 NEXT I 

556 RETURN 


768 PRINT AT ҮІІІ 
716 RETURN 


In feite passen we hier dezelfde technieken toe, 
als voor de 1K-uitvoering gelden. 

Het programma tekent allereerst de muur van 
het speelterrein op het scherm, met subroutine 
500. 

Nadien tekent subroutine 300 de bal op positie 
?А, В” en berekent telkens opnieuw de coördi- 
naten van dit punt aan de hand van de horizon- 
tale snelheid ”У” en de vertikale snelheid ”W”. 
Als de bal tegen een van de “muren” botst, dus 
van het scherm zou vliegen, zorgt deze subrou- 
tine voor het inverteren van de vertikale of ho- 
rizontale snelheid, zodat de bal terugkaatst. 

Het slaghout wordt bestuurd door subroutine 
700. De positie wordt vastgelegd door de varia- 
belen ”X, Y”. Het is niet noodzakelijk de vorige 
positie van de "ba" te wissen, daar er aan 
weerszijden van het symbool spaties zijn opge- 
nomen, die daar op de bekende manier auto- 
matisch voor zorgen. 

Het enige nieuwe in dit programma is de ma- 
nier waarop het slaghout wordt bestuurd en de 
wijze waarop men de bal op het hout laat kaat- 
sen. Het zal duidelijk zijn dat de "bat" heen en 
weer kan worden gestuurd, door het veranderen 
van de horizontale coördinaat, afhankelijk van 
de toets die men indrukt, Als de “linker pijl”- 
toets wordt bediend, dan wordt de waarde van 
ЭХ” met een eenheid verlaagd, waardoor het 
slaghout een schermplaats naar links gaat. 
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Drukt men daarentegen op de “rechter pijl”- 
toets, dan wordt de waarde van ”Х” met een 
eenheid vermeerderd. hetgeen tot gevolg heeft 
dat het symbool op het scherm naar rechts gaat. 
Deze procedure wordt uitgevoerd door subrou- 
tine 200. 

Het valt op, dat er in deze suhroutine geen 
maatregelen genomen zijn, die er voor zorgen 
dat de "bat" niet van het scherm kan “vallen”. 
Dit heeft te maken met de traagheid van de 
ZX81, Het invoeren van zo'n testprocedure zou 
de uitvoering van dit programma nog meer ver- 
tragen. 

Subroutine 400 houdt zich bezig met het terug- 
kaatsen van de bal op het slaghout. Als de bal 
dezelfde vertikale positie als het slaghout heeft, 
dan roept regel 350 genoemde subroutine te 
hulp om te kontroleren of ook de horizontale 
positie overeenkomt. Is dat het geval, dan 
“kaatst” de bal terug, door het inverteren van 
zijn vertikale snelheid, 

Als u de bal mist, detecteert regel 150 het over- 
schrijden van de onderste grens van het speel- 
veld. 

Na controle wordt de computer naar regel 20 
gestuurd, waar een nieuw spel start. Het spel 
wordt gespeeld door de instrukties in de regels 
120, 130 en 140, die steeds opnieuw door de 
"СОТО 120” in regel 150 worden doorlopen, 
Regel 120 roept de suhroutine op, die de “bat” 
dirigeert. Regel 130 zorgt door middel van sub- 
routine 700 voor het uittekenen van het slag- 
hout en regel 140 neemt de bal en het ”kaatsen” 
vooJ zijn rekening. 

Onderstaande afbeelding geeft een indruk van 
het door dit programma getekende beeld, waar- 
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hij valt op te merken dat de regels die ervoor 
zorgen dat iedere vorige positie van de bal 
wordt gewist, waren uitgeschakeld. 

Met de in dit hoofdstuk behandelde technieken 
kan men eigen spelletjes gaan programmeren 
en zelfs de voorgestelde programma’s (duikboot 
en squash) verbeteren en uitbreiden. Toch moe- 
ten we rekening houden met het feit, ook al 
worden we niet meer in onze mogelijkheden ge- 
гета door gebrek aan geheugen (de 1K-uitvoe- 
ring) we wél worden geconfronteerd met de 
traagheid van de 16K-machine! 


Schermindeling 

Als we de 7Х81 inschakelen, zal de computer 
gaan onderzoeken hoeveel geheugen er ter be- 
schikking staat. 

Als er minder dan 3.5K voorradig is, al de ma- 
chine cen zo zuinig mogelijke schermindeling, 
een zogenoemde “minimum screen” gaan op- 
bouwen. Fen ”minimum screen” bestaat in eer- 
ste instantie uit 25 symboolplaatsen, die ”newli- 
ne” worden genoemd. De eerste symboolplaats 
hiervan geeft het begin van het schermgedeelte 
van het geheugen aan. De 24 volgende syinbo- 
len kunnen het einde van een schermregel aan- 
duiden. Als men symbool-informatie op het 
scherm zet, worden deze symholen geplaatst 
tussen de bijbehorende ”newlinc”-symbolen. 
Op deze manier weet de computer de juiste 
schermbeeldplaats voor ieder ingetikt symbool. 
Op iedere regel kunnen 32 symbolen worden 
geschreven. Als er tussen twee “newline”-sym- 
bolen minder dan 32 symbolen staan, dan vult 
de machine dit aantal automatisch met spaties 
aan tot 32, 

Hoewel een spatie geen zichthare gevolgen 
heeft, is het voor de computer natuurlijk een 
volwaardig symbool en neemt het net zo veel 
plaats in als bijvoorbeeld de letter A. 

Er zijn dus twee systemen, waarmee de instruc- 
tie voor een volledig lege regel in het geheugen 
kan worden bewaard: ofwel daor 32 spatiesym- 
bolen tussen twee “newline’s” op te slaan, ofwel 
door twee “newline’s” achter elkaar te plaatsen, 
In het eerste geval stuurt de computer 32 spaties 
naar het scherm, want die staan in het geheu- 
gen! In het tweede geval berekent de machine 
het aantal spaties, nodig voor een volle regel en 
stuurt dat aantal naar het scherm. 

Het zal duidelijk zijn. dat we volgens het eerste 
systeem 32 geheugenplaatsen extra nodig heb- 


ben voor hetzelfde resultaat! Stel, dat het hegin 
van het beeldgeheugen er als volgt uit ziet. 


-NL-NL-H-I-SP-T-H-E-R-E-NL-NL-.. . -NL- 


waarhij "xl staat voor cen ”newline”-code, 
"TSP voor een spatie еп de overige letters ver- 
vangen moeten worden door hun codenummers 
(zeg: 45 voor H). De computer interpreteert 
deze geheugeninhoud als volgt. De eerste "NL" 
dient er alleen voor dat de computer weet dat 
het heeldgedeelte van het geheugen nu begint. 
De tweede "NL" markeert het cinde van de 
eerste regel. De computer stelt vast dat er tussen 
beide "NL”-codes geen symbolen staan en bij- 
gevolg worden 32 spaties naar het scherm ge- 
stuurd voor de eerste regel. 

Na de tweede 71.7 volgen acht symboolcodes. 
Deze worden op de tweede regel afgedrukt, ge- 
volgd door 24 spaties. De tweede regel is ook 
gevuld, Dit gaat zo door, tot het gehele scherm 
is volgeschreven, 

Deze beeldophouw is tamelijk ingewikkeld, 
maar heeft wel als groot voordeel dat er geen 
geheugenruimte verloren gaat voor het opslaan 
van onnodige spaties, 


Als er echter meer dan 3,5K aan geheugen ter 
beschikking staat, gebruikt de machine een veel 
eenvoudiger systeem, 

Alle 24 regels worden dan volledig met spaties 
gevuld en dat kost uiteraard veel meer geheu- 
gen! 

Wel worden de ”newline”-symholen nog steeds 
gebruikt voor het afbakenen van het beeldge- 
deelte van het geheugen en voor het aangeven 
van het begin van een nieuwe regel. De basis- 
struktuur is bij de 16K-uitvoering dus gelijk aan 
die van de 1K-versie. 

Als men informatie op het scherm schrijft, wor- 
den de bijbehorende spatiecodes in het geheu- 
gen vervangen door codes van de ingetoetste 
symbolen. De totale gebruikte geheugenom- 
vang blijft dus gelijk. Toch is er op deze regel 
één uitzondering! Als we een ”SCROLL”-in- 
struktie geven, schuift het volledige heeld een 
regel op naar boven en wordt een nieuwe regel 
aan het beeldgeheugen toegevoegd, bestaande 
ші èèn ’newline”-symbool. De eerste regel ver- 
dwijnt dan uit het beeldgeheugen. ledere 
*SCROLL”-instruktie introduceert dus een 
korte geheugenregel op het scherm. Na 22 


*SCROLL’s” is het gehele beeldgeheugen op 
dezelfde wijze opgehouwd als bij de IK -uitvoe- 
ring. Alle overbodige spatiesymbolen zijn dan 
verwijderd. 

Na een reset door middel van de ”CLS”-func- 
tie, gaat het geheel terug naar de oorspronkelij- 
ke situatie. 


Het ”РЕЕК”- en "РОКЕ”-еп van het beeld 

Uit de vorige paragraaf weten we, dat de 16K 
versie cen bepaald vast geheugendeel reserveert 
voor het heeld, als we geen "SCROLL” gebrui- 
ken. 

De eerste lokatie van het beeldgedeelte van het 
geheugen ligt in de ”D-FILE” сп daar bevindt 
zich een ”’newline”-symhool. De volgende 32 
lokaties worden gebruikt voor het opslaan van 
de codes van alle symbolen van de eerste regel. 
door u ingetoetst, of de originele spaties van de 
basisindeling. 

De eerstvolgende lokatie bevat weer een ”new- 
line” en deze indeling gaat zo verder tot en met 
het einde van de laatste regel van het beeldge- 
deelte, 

Het gevolg van deze indeling is dat we zeer een- 
voudig een verband kunnen leggen tussen een 
bepaalde plaats op het scherm en de geheugen- 
lokatie, waarin de code zit van wat er op deze 
plaats is weergegeven. 

En als we eenmaal het adres van zo’n lokatie te 
pakken hebben. kunnen we door ”РЕЕК” en 
”РОКЕ” te weten komen wat er op die bepaal- 
de plaats op het scherm staat of de inhoud van 
deze schermplek wijzigen. 

Als ”D” het adres is van de startlokatie van het 
eeldgedeelte, dan is het adres van de geheu- 
genlokatie die overeenkomt met kolomnummer 
“X” еп regelnummer ”Ү”: 


Ун 


ledere regel is immers 32 symbolen plus ееп 
„newline” lang en het gehcugendcel start met 
een „пе\ше”. 

Met deze formule kunnen we op icdere gewen- 
ste plaats van het scherm (cok op de normaliter 
niet te gebruiken twee onderste regels) nieuwe 
symbolen ”POKE”-en. 

Proheer maar eens onderstaand programma: 


16 CLS 
Ж LET D=PEEK 16396+2551PEEK 15397 
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30 FOR Lë Т0 31 
48 FOR Y=6 TO 23 
56 LET Stot 
bB POKE 8,128 

70 NEXT Y 

86 NEXT 1 


Het volledige scherm wordt volgeschreven met 
vierkantjes, ook de ”verboden” twee onderste 
regels! 

Algemeen gesteld, kan men het bekende bevel: 


PRINT АТ Y, 1548; 


waarin ”A$” staat voor een enkel symbool, ver- 
vangen door: 


POKE МІЗ, CODE (А$} 


waarin ”D” staat voor het adres van de eerste 
byte uit de beeldzone van het geheugen. 
Misschien vraagt u zich af, waarom we op zo’n 
ingewikkelde manier iets op het scherm zouden 
willen schrijven. Er zijn een aantal goede rede- 
nen te verzinnen, waaronder de mogelijkheid 
toegang te krijgen tot de onderste twee regels en 
de noodzaak sneller te kunnen printen. 
Nochthans is de mogelijkheid het scherm te 
kunnen ”РЕЕК”-еп veel nuttiger, want het is 
de enige manier om uit te zoeken wat er op een 
bepaalde plek van het scherm geschreven staat. 
Om de code terug te vinden van het symbool op 
geheugenlokatie ”Х, Y” staat de volgende for- 
mule ter beschikking. 


LET C=PEEK (D+X+¥93341) 


waarin ”D” staat voor het adres van de eerste 
lokatie in het beeldgeheugen en ”С” voor de 
code van het op te zoeken symbool. 

In de volgende paragraaf bespreken we een 
spel, waaruit duidelijk het voordeel blijkt van 
het door middel van een “PEEK” opzoeken van 
wat er op een bepaalde plaats van het scherm 
aanwezig 15. 


Een doolhofspel 

Onderstaand programma geeft de ZX81 versie 
van een zeer populair spel, zo populair zelfs dat 
we het bij zowat alle miero-computers terugvin- 
den, 

Door middel van de vier ”pijltjes”-toetsen kunt 
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u een sterretje over het scherm laten bewegen. 
Als het spel start, bevindt dit sterretje zich in de 
onderste rechter hoek van het beeld. De kunst is 
dit symbool naar de linker bovenhoek te sturen, 
hetgeen niet zo gemakkelijk is als het lijkt, want 
op het scherm wordt een soort doolhof opge- 
bouwd, bestaande uit een steeds wisselend pa- 
troon van donkere vlekjes! De kunst is dan ui- 
teraard het sterretje zo snel mogelijk tussen de 
openingen van de doolhof te sturen en een bot- 
sing met een vierkantje te vermijden. Met de 
kennis die we tot nu toe hebben vergaard, moet 
het mogelijk zijn zélf het programma op te stel- 
len. Aan de slag. dus! Het enige probleem is te 
bepalen wanneer het sterretje door een vierkant 
de weg wordt afgesneden en hierbij komt onze 
kennis over het ”РЕЕК”-еп van de beeldin- 
houd goed van pas! 


Nog een tip: het is niet noodzakelijk de positie 
van alle vierkantjes op het scherm op te slaan. 
Als u klaar bent, kunt u uw werkstuk vergelij- 
ken met onderstaand programma. 


16 CLS 

26 PRINT “HOEILIJKHEIDSERAAD 1-9 ?* 
30 INPUT L 

46 LET ияле 

50 ELS 

bË GOSUB 100 

79 GOSUB 390 

86 60605 590 


166 LET D=PEEK 16396+2561PEEK 16397 
116 RETURN 


200 LET C=PEEK(D+X+Y 83541) 
218 RETURN 


308 FAST 

316 GOSUE 1000 

328 FOR 1-1 TO 28440 
330 LET МЭН 

348 LET Y=RNDR19:41 

350 PRINT AT Y, 1; "IAI"; 
368 NEXT 1 

370 SLOW 


398 PRINT AT 4, 15"8* 
396 PRINT AT 20,30; "8; 
496 RETURN 


588 LET 10230 

510 LET ҮСЕ 

526 LET №0 

530 LET K=XC 

540 LET Y=YC 

558 LET AS=INKEYS 

558 GOSUE 900 

570 IF A$="" THEN GOTO 550 

580 IF A$="5" THEN LET ZC 

590 IF A$="B" THEN LET Y=XC+1 

608 IF AS="b" THEN LET Y=YC+1 

b10 IF AS="7" THEN LET Y=YC-1 

8% GOSUB 200 

630 IF C=13 THEN GOTO 800 

b40 IF Се THEN GOTO 556 

850 PRINT AT YC,XC;" *; 

Ый LET YC=I 

676 LET ai 

888 PRINT AT YC, XC;"2"; 

698 LET Hella 

7% GOTO 52e 

900 CLS 

810 PRINT AT 0,25" HEEFT HET GEHAALD IN ";M; 
ЖЫ 

820 PRINT “NOG EEN SPEL J/N" 

830 INPUT A$ 

849 IF A$(1)="]" THEN RUN 

850 IF GI e THEN GOTO 820 

856 STOP 


908 IF AND THEN RETURN 
ЯВ LET C=" * 
928 IF RND>.5 THEN LET C$="[A]" 


930 PRINT AT RNDE19+1 ,RND$29+1;C$ 
948 PRINT AT 1,1;"#"; 
950 RETURN 


1900 FOR 1-0 ТО 31 

1019 PRINT AT 0,1"[1AT 21,1; "C1"; 
1078 NEXT 1 

1838 FOR 1-6 ТО 21 

1040 PRINT АТ 1,0; "07%; АТ 1.317511; 
1050 NEXT I 

1868 RETURN 


Bij dit programma starten we met het opvragen 
van de moeilijkheidsgraad ”L”, een factor die 
bepaalt hoeveel vierkanten er worden gebruikt 
voor het blokkeren van het sterretje. Met deze 


informatie bouwen we door subroutine 300 de 
doolhof op. Hoe dat precies in zijn werk gaat, 
zal wel duidelijk zijn. Eerst doen we een beroep 
op subroutine 1000, waarmee we het speelveld 
afgrenzen. Nadien tekenen we de vierkanten 
[Alop willekeurige plaatsen op het scherm door 
middel van de "PRINT АТ” van regel 350. Let 
op het gebruik van ”РАЗТ” en ”SLOW”, waar- 
mee de trage berekening van alle posities aan 
het oog wordt onttrokken en de doolhof zo snel 
mogelijk op het scherm wordt getekend. Tot 
slot tekent deze subroutine een ”$”-symboot in 
de linker bovenhoek, als "doel waarna we stre- 
ven” en het sterretje in de startpositie "20. 30”. 
Het eigenlijke spel begint met een beroep op 
subroutine 500. Na het vaststellen van enige be- 
ginwaarden met ”LET”-instrukties, wordt door 
middel van regel 550 gekeken of er op een van 
de ”pijltjes”-toetsen wordt gedrukt. De waarden 
van ”ХС” en “ҮС”, die de momentele plaats 
van het sterretje bepalen, worden vervangen 
door ”Х” еп ”Y”, de nieuwe coördinaten van 
het symbool, rekening houdend met de toets die 
is ingedrukt. Nadien moeten we gaan bepalen 
of deze nieuwe positie van het sterretje wel kan, 
met andere woorden of er op deze plaats al niet 
een vierkantje is getekend. Als er op deze posi- 
tie een spatie staat, kan het sterretje er naar toe 
worden verplaatst. Als er gelijk welk ander sym- 
bool aanwezig is, moet de "zer" worden afge- 
keurd. Dat doen we uiteraard door het 
”PEEK”-en van de geheugeninhoud, door mid- 
del van subroutine 200 die door regel 620 wordt 
opgeroepen. De code van het op die plek aan- 
wezige symbool wordt opgeslagen іп ”С”. Er 
zijn nu een aantal mogelijkheden, 
Als de code gelijk is aan 13, de code van het 
$-symbool, dan zijn we blijkbaar in onze opzet 
geslaagd en wordt het spel door regel 800 beëin- 
digd. 
Als de waarde in ”C” niet gelijk is aan 0, de 
code voor een spatie, dan wordt dit door regel 
640 gededecteerd en wordt de "ze" verworpen. 
Als de code wel gelijk is aan 0, dan wordt de 
oude positie van het sterretje door midddel van 
regel 650 gewist en op de nieuwe coördinaten 
”ХС, YC” geprint dankzij regel 680. De groot- 
heid ”М”, die het aantal ”zetten” registreert, 
wordt met | verhoogd en regel 700 zorgt ervoor, 
dat het proces zich herhaald voor de volgende 
“zet”, 

Wat we nu nog moeten bespreken, zijn subrou- 
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tine 900 (verantwoordelijk voor het op- en af- 
bouwen van de wegversperringen) en de regels 
800 tot en met 860 (die de resultaten van het 
spel op het scherm weergeven en nagaan of er 
behoefte aan een nieuw spel bestaat). 

Beide systemen zijn gemakkelijk te begrijpen. 
Het gebruik van cen “PEEK” bij het bepalen of 
het sterretje op een vrije positie terecht komt, 
heeft als bijkomend voordeel, dat we geen extra 
“IF”-instruktics hoeven te gebruiken om het 
sterretje binnen het speelveld te houden. De 
doolhof is immers omringd door een aaneenge- 
sloten reeks vierkantjes en hierop is natuurlijk 
het ”C”-codesysteem ook van toepassing! 
Onderstaande afbeelding geeft een idee van de 
presentatie van dit spel op de monitor. 


Met deze nieuwe ervaring moet u in staat zijn 
om door middel van ”РЕЕК”- еп ”РОКЕ”-ш- 
strukties de werkelijkheid nabijkomende beel- 
den op het scherm te toveren. Een goede oefe- 
ning is bijvoorbeeld het uitwerken van het 
squash-programma met ”РЕЕК” en ”РОКЕ”. 


Het gebruik van "SCHOLL" in grafiekprogram- 
ma’s 

We hebhen in dit hoofdstuk een groot aantal 
technieken geintroduceerd, waarmee we bewe- 
gende beelden kunnen opwekken. Toch zitten 
we met nog één moeilijk op te lossen probleem: 
het gelijktijdig laten bewegen van een aantal 
objekten op het scherm. Met de bekende tech- 
nieken kunnen we over het algemeen niet meer 
dan één of twee objekten laten bewegen, al- 
thans als we ons tot BASIC-instrukties beper- 
ken. 


28 


Gelukkig bestaat er een uitzondering op deze 
regel. Probeer het volgende programma maar 
eens uit. 


16 CLS 

28 PRINT AT 21,RNDES1 "i"; 
38 SCROLL 

46 5070 2 


Door middel van een ”SCROLL”-instruktie 
kunnen we alles op het scherm een regel naar 
boven laten bewegen en de snelheid waarmee 
dit gebeurt is hovendien onafhankelijk van de 
hoeveelheid informatie op het scherm. 

De volgende vraag is: "Hoe kunnen we bij dit 
systeem bepaalde symbolen laten stilstaan? 
Wel, dan moeten we na iedere “SCROLL” het 
symbool dat stil moet blijven staan opnieuw 
met vaste coördinaten laten uitprinten. Voeg 
onderstaande regel toe aan het vorige program- 
ma: 


35 PRINT AT 0, 165 ger 


en er ontstaat een basisopzet, waarmee we bij- 
voorbeeld cen ruimteschip door de sterrenhe- 
mel kunnen sturen! 


Een ski-slalem spelletje 

Een mooi voorbeeld van het werken met 
*SCROLL”-technieken in grafische program- 
ma’s is het onderstaand ski-slalom programma. 
(Bij het intoetsen van dit programma moet u in 
de regels 20, 2100, 3040, 4060 en 4110 een ”Кіеі- 
ner dan” symbool onmiddellijk laten volgen 
door een “groter dan” symbool en mag u geen 
*niet-gelijk-aan” teken gebruiken!) 


19 RAND 0 

20 LET = 
30115 

48 DIM C (26,2) 
50 50808 5000 
£6 GOSUB 108A 
76 LET T=0 

80 LET Pt 

98 LET Kelk 
10 BOSUE 2000 
11@ GOTO 4600 


1660 FOR I=] Т0 25 


1610 LET C(I,1)=INT(RND85)+S 
1020 LET C(1,2)=1NT(RND§25) +4 
1030 NEXT I 

104@ LET C(1,1)=21 

1050 RETURN 


2000 PRINT AT 21,С41,2)1 73% 
2816 LET Kel 

2020 LET J=@ 

2016 LET 156 

2040 LET 1-2 

2050 LET 5=0 

2060 LET S=S+1 

2070 LET TETH 

2086 SCROLL 

2090 GOSUB 5000 

21% IF SCC(1,1) THEN GOTO 2000 
2110 PRINT AT 21,С01,2);В#0+1); 
2129 LET FT J 

2130 LET ІСІН 

2140 IF 1426 THEN GOTO 2058 
2150 FOR 1=1 TO 23 

2160 LET T=T+1 

2176 SCROLL 

2186 BDSUB 3000 

2198 NEXT 1 

2206 RETURN 


3000 LET AS=INKEY$ 

3010 IF A$="5" THEN LET X=X-1 

5020 IF AG="B" THEN LET X=X+i 

2050 PRINT AT Oj X5"8"5 

3840 IF TOC (L+i, 1) THEN RETURN 

3050 LET T=6 

3066 LET Ізін 

3070 LET K=NOT К 

JOBA IF МОТ K AND (X-C{L,2))>@ THEN RETURN 
3990 IF К AND (X-C4L,2))<@ THEN RETURN 


3100 LET PeP+i 
3110 PRINT "H" 
3128 RETURN 


4000 PRINT 

4010 PRINT “U PASSEERDE *;P;" POORTEN" 
4020 PRINT “PROBEERT U НЕТ NOG EENS? J/N" 
4030 INPUT AS 

4040 PRINT ñ$ 

8858 IF A$(11="N" THEN STOP 

4060 IF АП "1" THEN GOTO 4024 

3070 PRINT "НЕТ ZELFDE PARCOURS? J/N" 


4088 INPUT A$ 

4090 PRINT ñ$ 

4100 IF A$(1)="j" THEN GOTO 7@ 
4116 IF WI mn THEN GOTO 4076 
4120 GOTO 50 


5009 CLS 

5010 PRINT 

5020 PRINT TAR 88 KI RUN 
5038 PRINT TAB 8;"------------- : 


5040 PRINT 
5050 PRINT “U KRIJGT EEN AFDALING" 


5060 PRINT “MET 25 POORTJES" 

5878 PRINT 

5988 PRINT "U МОЕТ < LINKS PASSEREN" 
5090 PRINT "ЕМ > RECHTS, * 

519% PRINT 

3110 PRINT "U KUNT NAAR LINKS EN RECHTS" 
5129 PRINT “BEWEGEN MET DE PIJLTOETSEN, * 
5136 PRINT "(5 EN 8)" 

5140 PRINT 

3150 PRINT "DRUK EEN TOETS IN OM TE STARTEN" 
3160 IF INKEY$="" THEN GOTO 5140 

559 CLS 

5189 RETURN 


De technieken, die in dit programma worden 
gehruikt, zijn vrij simpele voorbeelden van 
*SCROLL”-grafieken. Toch moeten we goed in 
de gaten houden waar alfes zich op het scherm 
bevindt. 

Door middel van subroutine 5000 worden enige 
instruktieteksten op het scherm geschreven. 
Nadien wordt door middel van subroutine 1000 
het parcours volgens de wetten der willekeur 
uitgezet. Er worden namelijk twee willekeurige 
getalien gegenereerd, de afstand tussen twee 
opeenvolgende poorten (gemeten in aantal 
*SCROLL’s”) en de horizontale positie van ie- 
dere poort. Het spel start afs het programma 
een beroep doet op subroutine 2000, waardoor 
de eerste poort op het scherm wordt getekend 
en het parcours in de richting van de skiër 
(voorgesteld door cen sterretje) wordt bewogen 
door middel van achtereenvolgende 
”SCROLL’s”. 

Na een bepaald aantal "SCROLL’s”, voorge- 
steld door °C (2, 1)”, wordt de volgende poort 
op het scherm gezet. Het moeilijke punt ont- 
staat na 21 “SCROLL’s”, want dan bereikt de 
eerste poort de skiër. Er zijn immers 22 bruik- 
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bare lijnen op het scherm! Op dat moment 
wordt de positie van de skiër bepaald en beke- 
ken of hij zich aan de juiste kant van de poort 
bevindt. Volgens hetzelfde systeem wordt ge- 
controleerd hoeveel poorten de skiër passeert 
en hoe vaak hij aan de verkeerde kant van een 
poort zit. De details van deze programmering 
zijn erg eenvoudig (regels 2000 tot 3120). daar 
maken we geen woorden meer aan vuil, 

Als u het programma korrekt intoetst, verschijnt 
het volgende beeld op het scherm. 


SKIT RUN 


U KRIJGT EEN AFDALING 
MET 25 POORTJES В 


U MOET < LINKS PASSEREN EN > RECHTS 


U KUNT NAAR LINKS EN RECHTS 
BEWEGEN МЕТ DE PIJLTOETSEN (5 EN 8) 


DRUK EEN TOETS IN OM TE STARTEN 


Gepagineerde grafiek 

Met onze huidige kennis over de samenstelling 
van het beeldgedeelte van het geheugen en de 
ermee verband houdende variabelen, kunnen 
we een aantal aanvullende beelden creëren en 
door middel van “POKE”-instrukties naar be- 
lieven een van deze beelden op het scherm la- 
ten uitprinten, 
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Met deze techniek kunnen we de ZX8I als het 
ware omvormen tot een ”plaatjesalbum” en ie- 
dere “pagina” uit dit album zeer snel op het 
scherm zetten. 

Bij deze werkwijze ontstaan gemakkelijk fou- 
ten, met als resultaat: een leeg scherm en een 
machine die niet meer naar bevelen luistert. 
Het uitschakelen van het apparaat is dan het 
enige dat er op zit, hetgeen uiteraard wel de 
vernietiging van de geheugeninhoud tot gevolg 
heeft. 

Het principe is in essentie zeer eenvoudig, maar 
door de onvermijdelijke details wordt het ge- 
heel wel een beetje onoverzichtelijk, De ZX81 
maakt gebruik van twee systeemvariabelen om 
op de hoogte te blijven van de schermbeeldde- 
tails. De eerste, ”D-FILE”, noteert waar het 
beeldgedeelte van het geheugen zich bevindt. 
de tweede, "DF-CC”, kijkt waar het volgende 
symbool moet worden geprint. 

Als u dus ergens in het geheugen een tweede 
beeldpagina opbouwt en u verandert deze va- 
riabelen op de juiste manier, dan wordt deze 
nieuwe beeldpagina op het scherm afgebeeld, 
in plaats van de originele. Zolang deze tweede 
pagina in beeld is, zullen alle “PRINT”-instruk- 
ties op deze pagina worden opgenomen en niet 
op de originele, U kunt terugsehakelen naar de 
originele pagina, door het herstellen van de oor- 
spronkelijke adressen in ”D-PILE” en "DF- 
CC”. Het enige waar u op moet letten is dat het 
“POKE”-en van nieuwe adressen in de twee ge- 
noemde variabelen alleen in de ”FAST”-mode 
kan. De twee bytes moeten namelijk onmiddel- 
lijk na elkaar worden ре-”РОКЕ”-4. Al zou de 
computer proberen tussen beide bewerkingen 
een beeld op het scherm te zetten, dan hebben 
de variabelen geen zinnige waarden en gaat de 
machine zich een beetje “uitzinnig” gedragen. 
In de "FAST”-mode wordt gedurende het ver- 
werken van de nieuwe adressen van de variabe- 
len het scherm niet uitgeschreven. 

Om u enig idee te geven hoe dit systeem in de 
praktijk werkt, hebben we het volgende pro- 
gramma opgenomen. Zorg er echter wel voor, 
dat er geen fouten in staan, alvorens u het laat 
uitvoeren en onderneem geen aktie terwijl pagi- 
na 2 wordt gevormd! 


19 LET E=100+PEEK 16412+2558PEEK 16413 
26 GOSUB 1008 
30 LET C=E 


48 LET (ЕН! 

Se GOSUB 3000 

88 PRINT “SCHERM TWEE* 
78 FOR 1-1 Т0 198 

BG NEXT I 

90 LET C=A 

188 LET 6-8 

116 50518 30006 

128 PRINT "SCHERM EEN" 
158 FOR 1-1 Tü 108 
146 NEXT 1 

158 LET C=E 

158 LET D=E+Í 

179 GOSUB 5006 

186 6878 76 


1000 LET Е 
1918 FOR 1-1 TD 24 
1628 POKE 1,118 
1038 LET БІН 
1948 FOR K=1 TO 31 
1650 POKE 1,0 

1068 LET 1=1н 
1870 NEXT K 

1689 NEXT J 

$090 POKE 1,118 
1108 RETURN 


2000 LET АЕРЕЕК 16396+2563PEEK 16397 
2018 LET B=PEEK 1639B+2063PEEK 16399 
2028 RETURN 


3600 GOSUB 2009 

3810 FAST 

3020 POKE 15396, С-ІМТ(С/256) 3256 
3030 POKE 16397, INT(C/256) 

1040 SLOW 

3050 POKE 10396, D-INT(0/256)4254 
3866 POKE 16399, INT (0/256) 

3078 RETURN 


Subroutine 1000 bouwt een nieuwe beeldpagina 
op vanuit het startadres "E". Deze nieuwe pagi- 
па is opgebouwd uit 25 ”newline”-symbolen 
met 32 spatics ertussen. 


Met subroutine 2000 worden de adressen van 
de beeldvariabelen opgeslagen іп ”А” en ”В”, 
terwijl subroutine 3000 de adressen van ”C” en 
Эр” in de schermvariabelen ”POKE”-ed. 


Het hoofdgedeelte van het programma start 
met het opzoeken van een vrij geheugendeel en 
het opbouwen van een nieuw beeldsysteem, res- 
pectievelijk door middel van de regels 10 en 20. 
Nadien wordt met behulp van de regels 30 tot 
en met 60 omgeschakeld naar de tweede beeld- 
pagina en wordt “beeld twee” op het scherm 
geschreven. 

Na een bepaalde vertraging schakelen de regels 
90 tot en met 120 opnieuw de eerste pagina in 
en wordt deze ter bevestiging uitgeschreven. 
Vervolgens worden de twee pagina's afwisse- 
lend op het scherm geschreven, waarbij de 
boodschap ”beeld één” telkens een regel op- 
schuift, 

Deze methode om beelden in diverse pagina’s 
op te slaan kan worden gebruikt voor het toe- 
passen van speciale grafische effecten. Toch 
moeten we zeer voorzichtig zijn, daar steeds de 
mogelijkheid aanwezig is dat het programma 
wordt vernietigd en de computer op hol slaat. 
Vandaar dan ook, dat we deze techniek alleen 
aan gevorderde programmeurs aanbevelen. 


Besluit 

Nu u zoveel verschillende systemen voor het 
opbouwen van grafieken hebt leren kennen, 
moet u zonder meer in staat zijn zeer ingenieu- 
ze beeldkomposities op te bouwen, Zo zou u 
*SCROLL”-technieken kunnen mengen met 
“PEEK ”-grafieken, maar denk daarbij aan de 
wijziging van de beeldopbouw! Als u nu echter 
denkt dat u met de beschreven technieken het- 
zelfde soort ingenieuze, op tekenfilm lijkende, 
beelden kunt opbouwen als mogelijk is met de 
moderne TV-spelcomputers, moeten wij u te- 
leurstellen. De programmeertaal BASIC is daar 
gewoon niet snel genoeg voor! 

Voor wie verder wil in computergrafiek heeft 
maar één keuze: overschakelen naar program- 
meren in machinecode, waarover in hoofdstuk 
10 het een en ander wordt verteld, 
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5, HET ONTWERPEN VAN 
GROTE PROGRAMMA'S 


Kleine programma’s sehrijven op een machine 
met een redelijk ruim geheugen is tamelijk ge- 
makkelijk. In een klein programma gebeurt 
meestal niet zo erg veel en is het nog mogelijk 
alle opeenvolgende stappen in gedachten te 
houden tijdens het schrijven of nakijken van het 
geheel. 

Het onvoorbereid beginnen aan het opstellen 
van een programma, kan een uitstekende me- 
thode zijn voor korte stukjes, het werkt niet 
meer als ingewikkelde problemen in computer- 
taal moeten worden omgezet. 

Het is immers onmogelijk alle stappen over- 
zichtelijk in uw hoofd te houden, zonder dingen 
met elkaar te verwarren, en uiteraard is dat vra- 
gen om fouten. 

De enige goede manier om gelijk welke om- 
vangrijke klus aan te pakken is een systemati- 
sche programmeermethode toe te passen en die 
consequent aan te houden. 

Dit hoeft helemaal niet te hetekenen dat het 
programmeren er saaier op wordt en dat alle 
pret wordt vervangen door een of ander dor 
systeem. Integendeel, het eindpradukt wordt er 
alleen maar beter op en wat geeft meer vreugde 
dan het ontwerpen van programma’s waar men 
trots op kan zijn! 


Het ontwerpen van een programma 

Misschien heeft u wel eens gehoord dat een 
programma wordt opgebouwd aan de hand van 
een zogenaamde “flow chart” of “flow dia- 
gram”. Vaak wordt zelfs beweerd dat het abso- 
luut noodzakelijk is zo’n schema op te stellen 
alvorens men met het echte programmeren kan 
beginnen en dat die noodzaak alleen maar toe- 
neemt als de problemen ingewikkelder worden. 
Missehien heeft men u zelfs wijsgemaakt dat dit 
de enige goede programmeertechniek is en dat 
al het andere alleen maar flodderige program- 
ma’s aflevert. 

Uiteraard is dat volledig een kwestie van per- 
soonlijke voorkeur en ook van gewoonte. Na- 
tuurlijk is het noodzakelijk dat u alvorens met 
het schrijven van een programma te beginnen, 
ruwweg een overzicht hebt van wat er allemaal 
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te gebeuren staat, maar naar onze mening hoeft 
dit eerste inzieht niet zo gedetaileerd te zijn als 
noodzakelijk voor het tekenen van cen ”flow- 
chart” (stroomdiagraz ). 

Tk persoonlijk, werk in eerste instantie steeds 
met een beschrijving van het programma in een 
mengelmoesjc van Nederlands en BASIC. Na- 
dien ga ik echt voor de computer zitten en het 
programma opstellen. 


Als voorbeeld van deze techniek gaan we in 
deze paragraaf samen een programma opstel- 
len, waarmee we kleine kinderen de beginsclen 
van rekenkundige bewerkingen kunnen bij- 
brengen. 

De eerste stap is nadenken over wat we het pro- 
gramma precies willen laten doen. Dit in ge- 
dachten op te stellen schema kan er ongeveer 
als volgt uit zien. 


"Het programma moest eerst een vraag op het 
scherm schrijven en wachten op een antwoord, 
Als dit antwoord juist is, moet de gebruiker daar- 
van in kennis worden gesteld en moet de volgende 
vraag op het scherm verschijnen. [5 het antwoord 
fout, dan moet vok dat worden gemeld en dezelf- 
de vraag nogmaals op het scherm worden ge- 
schreven”, 


Noteer dat zelfs in deze eerste benadering al be- 
grippen zitten, die we zo in BASIC kunnen 
overnemen. zoals “als” (“IF”) en “schrijven” 
CPRINT”)! 

U zou nu al het echte BASIC-programma kun- 
nen opstellen, maar het is denkbaar dat u ver- 
kiest eerst toch nog een ietwat gedctailleerdere 
heschrijving, met bijvoorbeeld een preciese Гог- 
mulering van de vragen, op te stellen. 

Deze manier voor het schrijven van computer- 
programma’s wordt de “stapsgewijze verfij- 
ning” genoemd, omdat er wordt hegonnen met 
een zeer vaag idee en door dit idee telkens op- 
nieuw uit te werken, ontstaat er cen steeds gc- 
detailleerdere beschrijving, die uiteindelijk re- 
sulteert in BASIC-regels. Na een aantal keren 
op dic manier te hebben geprogrammeerd, zult 


u tot de ontdekking komen dat dit in feite een 
zeer natuurlijke manier van werken is! 

De tweede “verfijning” van het leren-rekenen- 
spel zou er als volgt kunnen uitzien. 


“Selekteer het soort bewerking: +; —; Жі. 
Genereer twee tamelijk kleine willekeurige getal- 
беп. 

Schrijf het vraagstuk op het scherm еп wacht ор 
een antwoord. 

Als het antwoord juist is, meldt dit dan aan de ge- 
bruiker en vervolg met het volgende vraagstuk. 
Als het antwoord fout is, meldt dit dan aan de ge- 
bruiker en print dezelde vraag nogmaals op het 
scherm”. 


Het punt waarop u vindt dat deze “stapsgewijze 
verfijning” ver genoeg is gegaan om achter de 
computer te gaan zitten hangt natuurlijk volle- 
dig van uw eigen (on)zekerheid af! Het voor- 
deel van dit systeem is, dat u het kunt aanpas- 
sen aan uw programmeerervaring en de 
moeilijkheidsgraad van het probleem. Daar- 
naast is ег het niet te onderschatten psycholo- 
gisch voordeel, dat er al van de eerste stap af 
iets op papier staat, hoe vaag ook, Vaak is dat 
nu net dat extra opstekertje, die ons over onze 
angst beenzet en ons doet besluiten toch maar 
voor het scherm te gaan zitten! 


Het gebruik van subroutines 

Hoewel de in de vorige paragraaf beschreven 
metbode van de ”stapsgewijze verfijning” aar- 
dige resultaten oplevert, komen we er tocb mee 
in de problemen als we te maken krijgen met 
zeer lange programma’s. Als het aantal details 
toeneemt. worden we immers geconfronteerd 
met een immense hoeveelheid BASIC-instruk- 
ties en variabelen en zien we door de bomen het 
bos niet meer. In zo’n geval moeten we bet ge- 
heel gaan onderverdelen in kleinere ”brokjcs”. 
Dat kan meestal gemakkelijk, want een pro- 
gramma bestaat uit een aantal onderdelen die 
ieder een welomschreven taak uitvoeren. Zo 
kunnen we in het voorbeeld van het rekenpro- 
gramma drie duidelijk van elkaar gescheiden 
delen afbakenen: 

— het deel dat de vragen opstelt; 

— het deel dat de vragen op het scherm schrijft; 
— het deel dat de antwoorden evalueert. 


leder deel kan als een afzonderlijk programma 


worden behandeld en min of meer onafhanke- 
ijk van de overige worden uitgewerkt. De kunst 
bij bet schrijven van grote programma’s is dus 
het opzoeken van de diverse kleinere deelpro- 
gramma’s. Soms zal blijken dat ook deze deel- 
programma’s in feite nog te groot zijn, Dan zul- 
en we nog eens een onderverdeling moeten 
doorvoeren, 

Het ligt voor de hand te veronderstellen dat dit 
principe van bet opdelen van een programma 
in een aantal kleinere alles te maken heeft met 
et begrip “subroutine”. De BASIC-instrukties 
*GOSUB” en "RETURN" kunnen worden ge- 
bruikt om een aantal instruktieregels om te zet- 
ten in een afzonderlijk, op zichzelf staand, pro- 
grammadeel. Bij het voorbeeld van het 
rekenprogramma kunnen we veronderstellen 
dat er reeds twee subroutines bestaan, namelijk 
ëën startend bij regelnummer 1000 die het op- 
stellen van de vragen voor zijn rekening neemt 
en één beginnend bij regel 2000, die de vragen 
op het scberm schrijft. De twee eerste regels van 
de tweede verfijning kunnen dan worden ver- 
vangen door: 


18 60508 1000 
28 50508 2060 


Zo’n programma is in één oogopslag te overzien 
en het is tamelijk eenvoudig om te ontbouden 
waar we iedere subroutine voor willen gebrui- 
Кеп. Als we de ”GOSUB’s” zouden vervangen 
door de normale BASIC-regels voor het uitvoe- 
ren van de specifieke taken. zou het programma 
er zeer gecompliceerd uitzien. In principe zou- 
den we ook bet derde programmadeel door een 
subroutine kunnen vervangen. Toch is dat niet 
zo verstandig, omdat we in dit deel ofwel sub- 
routine 2000 moeten laten berhalen (bij een 
fout antwoord) of het totale programma (bij 
een goed antwoord). We kunnen deze verwij- 
zingen dan ook beter in de vorm van normalc 
BASIC-regels als deel van hct hoofdprogramma 
opbouwen. 

Als we alles samenvatten, ontstaat bet volgende. 


19 GOSUB 1090 

29 60908 2009 

38 INPUT VRAAG 

40 IF VRAAG=ANTWOORD THEN 5070 10 
50 PRINT "PROBEER HET №6 EENS" 
58 5070 20 
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Een ander voordeel van het toepassen van sub- 
routines is dat we ze in een hoofdprogramma 
kunnen gebruiken, ook al zijn ze nog niet ge- 
sehreven! Als u ervan uitgaat dat die twee sub- 
routines 1000 en 2000 te zijner tijd worden uit- 
gewerkt, kunt u uw aandacht concentreren op 
het hoofdprogramma en later de subroutines 
één voor één onder handen nemen. 

We kunnen dus een duidelijk verband leggen 
tussen het principe van de ”stapsgewijze verfij- 
ning” en het gebruik van suhroutines. De de- 
tails van de subroutines kunnen vrij vaag blij- 
ven tot ze echt aan de orde komen. Op dat 
moment kunt u zelfs besluiten dat het veel ge- 
makkelijker is bepaalde subroutines weer op te 
splitsen in deel-subroutines... en ga zo maar 
door tot alle programmastappen als eenvoudigc 
subroutines zijn te beschrijven! Het gebruikma- 
ken van nog ongeschreven subroutines bij het 
opstellen van het hoofdprogramma cn het na- 
dien op dezelfde manier behandelen van deze 
subroutines staat bekend onder de naam ”mo- 
dulair programmeren”. U zult in de praktijk 
ontdekken, dat deze manier van programmeren 
zeer bevredigend en vruchtbaar is. Modulaire 
programma’s zijn gemakkelijker te begrijpen en 
eenvoudiger aan te passen dan de gebruikelijke 
onoverzichtelijke lijst met BASIC-instrukties. 
Bovendien kunt u subroutines in allerlei hoofd- 
programma’s opnemen, zodat u als het ware 
niet telkens het wiel hoeft uit te vinden! 


We kunnen nu de theorie in praktijk gaan bren- 
gen en trachten de nog ongeschreven subrouti- 
nes van het leren-rekenen-spel uit te werken. 


1008 LET A=INT (RNDEL@) 

1010 LET B=INT(RND110) 

1020 LET 0$="+-4/" CENT (RNOR) +1) 

1030 LET ANTWOORD=VAL (ТАЗ (A) +O$+5TR$ (B) } 
1040 RETURN 


2000 CLS 

2010 PRINT AT 10,55Az" "06:9 "383" =" 
2028 PRINT AT 14,54"WAT 18 HET ANTWOORD 2" 
2036 RETURN 


Let op de manier waarop we in regel 1020 één 
van de vier basis-bewerkingen door het toeval 
laten uitkiezen en op het gebruik van de 
”VAL”-functie in regel 1030 voor het uitwerken 
van het antwoord. 
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Op het scherm verschijnt dan het volgende 
plaatje. 


416 = 


МАТ 15 НЕТ ANTWOORE 2 


Het BASIC-dialekt van de ZX81 heeft een extra 
eigenschap, waardoor het toepassen van sub- 
routines nog overzichtelijker kan worden. Men 
kan de "GOSUB” en ”GOTO”-instrukties op 
een andere dan de gangbare manier, namelijk 
gevolgd door een regelnummer, gebruiken. U 
kunt deze instrukties ook laten volgen door cen 
meer algemene uitdrukking. Zo interpreteert de 
computer de regel "GOSUB 2 * 3 + 1” op de- 
zelfde manier als ”GOSUB 7”. Op deze manier 
aangewend, kunnen we met dit grapje niet zo 
erg veel doen. Maar omdat een enkele variabele 
ook een uitdrukking is (zelfs de meest simpele 
vorm van een uitdrukking!) kunnen we bijvoor- 
beeld ook schrijven: 


5 LET BENSUESTION=100@ 

& LET PRINTQUESTION=2000 
10 BOSUB GENQUEST ION 

20 GOSUB PRINTQUEST ION 


Nu wordt dit ogenschijnlijk nutteloze ideetje 
erg handig, want we kunnen suhroutines gaan 
benoemen, waardoor onze programma’s niet al- 
leen veel gemakkelijker zijn te leren, maar ook 
eenvoudiger te veranderen. 


De boodschap van deze paragraaf is simpel en 
duidelijk: gebruik subroutines! De volgende 
paragraaf is niet zo eenvoudig en u kunt hem 
met een gerust hart overslaan. We gaan ons na- 
melijk bezig houden met een techniek, waar- 


voor dezelfde waarschuwing geldt als voor de 
“gepagineerde grafiek” van hoofdstuk 4: voor- 
behouden aan experts! 


Het uitgebreide "RETURN" heel 

Er zijn gevallen denkbaar, waarbij het gebruik 
van een suhroutine erg handig kan zijn maar 
waarbij het om één of andere reden toch ge- 
makkelijker is dat niet te doen, Zo werd het 
laatste gedeelte van het “leren-rekenen-pro- 
gramma” niet als een subroutine opgebouwd, 
omdat verschillende regels uit het hoofdpro- 
gramma resultaten opleverden, afhankelijk van 
de uitkomst van de hierin uitgevoerde test. De 
reden waarom het niet mogelijk is door de re- 
sultaten van een subroutine te laten bepalen 
naar welke regel van het hoofdprogramma 
moet worden gesprongen, is dat een suhroutine 
altijd eindigt met een “RETURN” en deze in- 
struktie de computer altijd naar de regel, die 
volgt op de ”GOSUB”-regel, stuurt. 

In de meeste gevallen kunnen dit soort proble- 
men worden opgelost voordat de subroutines 
worden uitgewerkt. Soms echter, blijkt pas hij 
het schrijven van een subroutine dat wat er ver- 
der in het hoofdprogramma moet gebeuren, af- 
hankelijk is van de resultaten van de subrouti- 
ne. Het zou dan zeer handig zijn als we de 
subroutine konden afsluiten met een ”GOTO” 
regel пг....”, waarbij het “regel nr...” zou 
worden hepaald door de resultaten van de suh- 
routine, In principe kan dit zonder dat er een 
foutmelding ontstaat, maar alleen als er slechts 
één subroutine tegelijkertijd wordt opgeroepen. 
Het enige waarop we moeten letten is dat het 
“GOSUB”-gedeelte van het geheugen maar 
twee lokaties langer is dan noodzakelijk en dat 
deze reserve door het gebruiken van één sub- 
routine zonder RETURN” volledig Кап wor- 
den opgebruikt. Als u dus van de ene suh- 
routine naar een andere wilt gaan met een 
”СОТО”, dan kunt u er zeker van zijn dat er 
bij de volgende ”RETURN”-regel grote proble- 
men ontstaan! 

We hehhen echt een "RETURN regel nr... .”- 
instruktie nodig, waarmee we uit een subrouti- 
ne naar een bepaalde regel kunnen gaan. 

Wel moeten we duidelijk voor ogen houden, 
dat dit soort grapjes niet als normale BASIC- 
programma-teehnieken zijn te gebruiken, al 
kunnen we ze soms toepassen om een fout in 
het programma te herstellen. 


Met onze huidige kennis van de geheugenop- 
bouw van de computer is het niet zo moeilijk 
door middel van enige BASIC-regels het adres 
dat is opgeslagen in de "GOSUB”-stack te ver- 
anderen, zodat de volgende RETURN” ons 
naar gelijk welke regel voert. 

Als voorbeeld: 


16 BOSUB 200 

26 PRINT “HIER 28“ 
39 PRINT "HIER 30" 
% STOP 


190 LET S=2+PEEK 14386+206KPEEK 18387 
116 POKE 5,L-INT(L/256) #256 

129 РОКЕ 541, INT(L/256) 

150 RETURN 


200 PRINT "HIER 200" 
216 LET L=3¢ 
229 ОТО 108 


Door dit programma wordt eerst de mededeling 
“Hier 200” ор het ѕеһегт geschreven (subrouti- 
пе 200) en nadien de hoodschap "HIER 30”. 
Als suhroutine 200 met een normale "RE- 
TURN” zou zijn afgesloten, dan zou de regel 
“HIER 20” ook op het scherm worden geschre- 
ven. Wat er nu gebeurt is dat de vier regels 100 
tot en met 130 de geheugenlokatie opzoeken, 
waarin het regelnummer van de RETURN” 15 
opgeslagen, en dit nummer vervangen door de 
waarde van "LU, 

Door regel 210 wordt de waarde van 71.” gelijk 
gesteld aan 30 en met regel 220 gaan we naar 
regel 100, waarin het net besprokene gebeurt. 
Vandaar dat de "RETURN" de computer naar 
regel 30 stuurt in plaats van naar regel 20 en de 
tekst "HIER 20” niet op het scherm verschijnt. 
Het deelprogramma van de regels 100 tot en 
met 130 kan telkens worden gebruikt, als we na 
een subroutine naar een andere regel willen 
gaan dan waar een normale "RETURN" naar 
verwijst, 


Programma-verzamelingen — menu’s 

Vaak kan een groot programma met sukses 
worden onderverdeeld in kleinere delen, waar- 
door het opstellen van het programma veel ge- 
makkelijker wordt. Soms is het zo, dat we in 
grote programma’s reeds bestaande kleinere 
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programma’s kunnen verwerken. Deze kleinere 
delen kunnen zelfs los van elkaar zijn ontwik- 
keld en geschreven door verschillende program- 
meurs. 

Door gebruik te maken van een zogenoemd 
“menu” kunnen ze evenwel overzichtelijk wor- 
den samengevoegd. 


Als ieder deelprogramma een duidelijk geschei- 
den regelnummering meekrijgt, dan kunnen al 
die deelprogramma’s los van elkaar worden in- 
getoetst. Wat er dan verder nog nodig is, is een 
extra programma, het menu, waarin de naam 
van de diverse deelprogramma’s wordt vermeld 
еп een verwijsmogelijkheid wordt opgenomen. 
Zo kunnen de drie in hoofdstuk drie besproken 
“utilities” als volgt in de vorm van een menu 
worden gepresenteerd. 


9808 CLS 
9010 PRINT ТАВ(5): UTILITIES 
9020 PRINT AT 5,0 
2030 PRINT "U KUNT KIEZEN UIT;" 
9040 PRINT AT 10,0 
9058 PRINT TAB 53"{1) GEHEUGEN GEBRUIK" 
9060 PRINT TAB 5;"(2) VARIABELEN LIJST" 
2070 PRINT TAH S3"(3) HERNUMMERTNG" 
9080 PRINT ТАВ 53"{4 STOP! 
9090 PRINT AT 20,0; 

"TIK HET NUMMER VAN UW KEUZE IN 
9100 INPUT Je 
9116 IF 2841 DR J64 THEN GOTO 9099 
9126 IF 26-і THEN 60508 9208 
9136 IF 20-2 THEN GOSUB 9300 
9148 IF J0=3 THEN GOSUB 9800 
9158 IF 20-4 THEN STOP 
9160 GOTO 9900 


Wel moeten de laatste regels van de drie ”utili- 
ties” zo worden gewijzigd, dat de computer na 
het doorlopen van een “utility” terug naar het 
menu-programma gaat. Dat is niet zo moeilijk; 
de *STOP”-instrukties van de regels 9240 (utili- 
ty 1). 9330 (utility 2) еп 9900 (utility 3) worden 
vervangen door ”RETURN”-regels. Het voor- 
deel van zo’n menu is dat we niet meer alle 
startregels van de “utilities” hoeven te onthou- 
den. Wilt u een “utility” gaan gehruiken, toets 
dan regel "GOTO 9000” in en het volgende 
verschijnt op het scherm. 
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UTILITIES 
U KUNT KIEZEN UIT; 


(1) GEHEUGEN GEBRUIK 
{2} VARIABELEN LIJST 
($) HERNUMMER ING 

(4) STOP 


ТІК HET NUMMER VAN UW КЕШЕ IN 


Gebruikersvriendelijke programma’s 

Voor wie met programmeren begint, zal het cen 
zorg zijn hoe een programma er in zijn uitein- 
delijke vorm uitziet. Als het maar werkt! 


Toch zou het jammer zijn, als u dezelfde menta- 
liteit blijft behouden. De door u opgestelde pro- 
gramma’s, hoe ingenieus ook bedacht, zijn dan 
negen van de tien keer alleen maar voor uzelf 
begrijpelijk! Misschien vindt u dat thans geen 
probleem, maar vergeet niet dat er ontelbare 
computerclubs bestaan. 

En op het moment dat u lid wordt van zo’n 
club, zult u ontdekken hoe belangrijk het is dat 
uw programma’s door anderen kunnen worden 
gebruikt. 

Om maar niet te spreken over de mogelijkheid 
goed uitgewerkte programma’s voor geld aan 
tijdschriften te verkopen! 

Dat eist wel wat extra van de programmeur, na- 
melijk een gevoel voor het opstellen van ”ge- 
bruikersvriendelijke” programma’s. Program- 
ma's, die ook voor de minst crvaren 
computergebruikers te verstaan zijn! Als u vol- 
gens dit systeem programma’s wilt ontwerpen, 
moet u cr altijd van uitgaan, dat het program- 
ma ook te begrijpen moet zijn voor mensen, die 
erg weinig van computers afweten en zelfs nict 
ingewijd zijn in het probleem, waarover het 
programma gaat. 


Natuurhjk is het niet zo eenvoudig een kom- 
pleet overzicht te geven van de regels, die be- 
langrijk zijn voor het ontwerpen van gebrui- 
kersvriendelijke programma's. 


Onderstaande regels geven echter wél de basis 
aan, waaraan gebruikersvriendelijke program- 
ma’s moeten voldoen: 


— stel steeds klare en ondubbelzinnige vragen 
en vermijd het gebruik van vakjargon; 

— kontroleer dadelijk het antwoord op iedere 
vraag en is het antwoord niet goed, herhaal 
dan de vraag; 

— ga niet muggeziften over de juiste vorm van 
een antwoord: “J” is net zo goed als “JA”; 
vul het scherm niet met te veel informatie en 
gebruik de “PAUSE” samen met “vervolg 
door het indrukken van een willekeurige 
toets” om het tempo van het programma aan 
te passen aan de gebruiker; 

— voorkom door het toepassen van ”PRINT 
AT”-instrukties, dat het scherm voortdurend 
met dezelfde vraag op dezelfde plaats wordt 
volgeschreven. Gehruik voor het uitprinten 
van uitvoerige lijsten met gegevens de in- 
strukties "PRINT АТ 21,0”, "PRINT LIST” 
en “SCROLL”, 
herhaal het antwoord op cen vraag op de re- 
gel waar ook de vraag stond, zodat de ge- 
bruiker het antwoord kan terugvinden; 

— neem de moeite een goede titelpagina op te 
stellen, met een korte introduktie over de 
mogelijkheden van het programma. 


Kortom, het schrijven van goede gebruikers- 
vriendelijke programma’s is niet zo eenvoudig, 
maar de moeite van het proberen zeker waard! 
Een goed voorheeld van een uitstekend uitge- 
werkt programma is het statistisch programma 
in het volgende hoofdstuk. 


Debugging 

Het opzoeken van fouten in programma’s is erg 
moeilijk uit een boekje te leren. De regels voor 
het opstellen van programma’s zijn vrij eenvou- 
dig aan te leren, maar de juiste manier om fou- 
ten uit programma’s te halen is iets dat niet met 
een puar eenvoudige regels is te verwezenlijken. 
Daar doet men meestal jaren over, 

Het is namelijk zo dat het debuggen” van een 
programma iets is wat veel beter in de praktijk 
dan uit cen of ander boek kan worden geleerd. 
Toeh kunnen we wel een paar methodes aan de 
hand doen. Bovendien heeft de 2Х81 enige 
handigheidjes, die nuttig zijn voor het opsporen 
van fouten. 


Sommige fouten zijn gemakkelijk te ontdekken. 
Het programma doet niet wat we ervan ver- 
wachten, we laten de programmaregels uitprin- 
ten en de gedachte “hoe is het mogelijk dat ik 
dat niet heh gezien” flitst door ons hoofd. De 
fout ligt voor de hand en is in een mum van tijd 
hersteld. Moeilijker wordt het, als we na uren 
staren naar de reeks BASIC-instrukties niets 
verdachts kunnen vinden. Blijf in zo’n geval 
niet te lang naar het programma kijken! Dat 
helpt toch niet. Om een fout op te sporen moe- 
ten we kijken hoe het programma door de ma- 
chine wordt uitgevoerd en komt dat overeen 
met de manier waarop het zou moeten. 

Als u daar een tegenstrijdigheid in ontdekt, 
heeft u in ieder geval een aangrijpingspunt om 
de fout te lokaliseren, al wil dit nog nict zeggen 
dat we de fout dan ook direkt hebben. 

Laten we eens kijken wat voor soort informatie 
interessant is voor het opsporen van fouten. Dat 
is niet zoveel als u misschien denkt. In feite 
hehben we maar in twee zaken interesse: de 
volgorde waarin de programmaregels worden 
uitgewerkt en de waarde die in de diverse varia- 
belen is opgeslagen, 

Sommige BASIC-dialekten hebben een ”TRA- 
CE”-instruktie, dic het nummer van de regel 
die wordt uitgewerkt op het scherm print. Hoe- 
wel men bij de ZX81 BASIC daar niet aan heeft 
gedacht, kunnen we wel de “8ТОР”- en de 
“CONTINUE”-instrukties toepassen, Als u wilt 
weten wat er op een bepaald moment gebeurt, 
voert u tijdelijk cen “STOP”-instruktie in. De 
computer zal dan op dat punt stoppen en de 
bijbehorende rapportcode weergeven. Daar is 
ook het regelnummer in opgenomen, dus door 
het invoegen van een aantal “STOP”-codes іп 
een programma kunt u toch een indruk krijgen 
van de volgorde waarin de diverse regels wor- 
den uitgevoerd. Na zo’n onderbreking kunt u 
door middel van “utility nummer 2” of met een 
“PRINT”-instruktie een idee krijgen over de іп 
de variabelen opgeslagen waarden. U kunt zelfs 
met behulp van een “LET” de inhoud van een 
variahele wijzigen. Het enige wat u op deze ma- 
nier пісі kunt doen, is een extra regel tussen- 
voegen! 

Als alles in orde is bevonden, kunt u door het 
intikken van “CONTINUE” het programma 
verder laten afwikkelen. 

Het enige nadeel van deze methode is dat het 
gebruik van een “PRINT”-instruktie voor het 
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weergeven van de inhoud van de variabelen het 
scherm wist. Als u daarna verder werkt, blijft u 
dus met een incompleet scherm zitten! 


Als u eenmaal weet dat er fouten in het pro- 
gramma zitten, kunnen ze er met dezelfde 
werkwijze tamelijk snel worden uitgehaald. 

Een heel ander verhaal is het om er absoluut ze- 
ker van te zijn dat er geen verborgen fouten in 
een programma blijven staan. Eigenlijk bestaat 
hiervoor geen sluitende methade. 

De enige, tijdrovende, manier is het programma 
met steeds weer andere begingegevens te laten 
lopen. Dit kan volgens bepaalde systemen, 
maar zelfs deze geven geen waterdichte garan- 
tie! Ze sturen verschillende programma’s langs 
alle mogelijke wegen van de eerste naar de laat- 
ste regel. 

Het beste wat u kunt doen, is het programma 
door iemand anders te laten testen. U, als ont- 
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werper, kunt dagenlang bezig zijn met een be- 
paald programma en het foutvrij verklaren. le- 
mand anders heeft binnen dertig seconden 
soms toch nog een fout ontdekt! De meest voor 
de hand liggende reden is dat gebruikers van 
een programma op een andere manier met een 
programma omgaan dan de ontwerper. 

Zij zuilen beginnen met de makkelijkste delen 
van het geheel te testen, terwijl u, als ontwerper, 
eerder gaat kijken of er in de ingewikkeldste de- 
len fouten zitten. Vergeet echter niet dat fouten 
net zo vaak in de voor de hand liggende delen 
van een programma voorkomen als in die stap- 
pen, waar u urenlang over hebt gezwoegd. 

Als u ooit met zo’n vervelende ontdekking 
wordt geconfronteerd, moet u maar denken dat 
zelfs in de beroemdste programma’s van de 
grootste software firma’s soms toch nog fouten 
worden ontdekt, zelfs geruime tijd na het ver- 
schijnen op de markt! 


6. GEGEVENS OP BAND 


De 2Х81 kan met behulp van de ”ЗАУЕ”- en 
“LOAD” -instrukties rechtstrecks programma’s 
op een band opnemen, maar geen ”variabelen”. 
Door het schrijven van bepaalde programma’s 
zijn we echter wel in staat gegevensbestanden 
op cassetteband op te slaan. 
In dit hoofdstuk komen de problemen, die 
daarbij om de hoek komen kijken, aan de orde 
en gaan we ссп tamelijk uitgebreid programma 
opstellen, waarbij we deze techniek zullen ge- 
bruiken. 


Het principe van de bandopslag van de ZX81 
Een van de mogelijkheden, die u waarschijnlijk 
het cerst hebt toegepast, is het "SAVE”-en en 
*LOAD”-en van een programma op een casset- 
teband. Heeft u een goede recorder dan werkt 
dit systeem feilloos, als u eenmaal de juiste 
stand van de volume- en toonregelingsknoppen 
hebt gevonden. 

De volgende logische stap is uiteraard het op- 
stellen van programma’s, waarmee gegevensbe- 
standen op de band kunnen worden gezet. Het 
probleem is dat de ZX81 slechts twee instruktics 
kent die het verkeer tussen computer en recor- 
der regelen, 


SAVE “PROGRANMA-NAAN* 
en 
LOAD "PROGRANMA-NAAN* 


De meeste microcomputers kennen nog de vol- 
gende instruktie. 


SAVE A 


waarbij "AT staat voor de naam van het ?аттау” 
dat op de band wordt gezet. 

Het ontbreken van deze instruktie is dan ook 
één van de punten van kritiek op de 2Х81. Een 
nadere ‘studie van de werking van “SAVE” en 
"LOAD" bewijst echter dat deze instrukties 
hecl wat meer ín hun mars hebben dan op het 
eerste gezicht lijkt. 

Door de instruktie "SAVE” wordt de inhoud 
van het geheugen tussen de lokatie met adres 
16393 (dit adres ligt in de systeemvariabelenzo- 


ne) en de lokatie waarvan we het adres terug- 
vinden in ”E-LINE”, opgenomen op de band. 
Dit geheugendeel omvat bijna alle systeemva- 
riabelen, de volledige programmazone, de ”dis- 
play-file” en alle programmavariabelen. Wat 
op de band wordt gezet, geeft dus een moment- 
opname van alle gegevens, die belangrijk zijn 
voor een lopend programma. 

Als u op gelijk welk punt van een programma 
een ”SAVE”-instruktie invoert, worden niet al- 
een alle BASIC-regels van dat programma op- 
genomen, maar ook de momentele inhoud van 
het scherm en alle variabelen. Als u deze infor- 
matie door middel van een ”LOAD” opnieuw 
in het geheugen inleest, wordt die momentop- 
name als het ware gereactiveerd en zal de com- 
puter het programma verder uitwerken vanaf 
de plaats waar u hem heeft gestopt. 

Maar hoe valt het dan te verklaren dat ieder 
programma dat van de band in het geheugen 
wordt geladen, na de ”RUN”-instruktie start 
vanaf het begin, zonder rekening te houden met 
wat er voorheen heeft plaatsgevonden? Het 
scherm is immers altijd leeg, er wordt geen re- 
kening gehouden met een eerder ”RUN”-bevel 
en alle variabelen worden op nul gezet. 

Het antwoord op deze vraag is tweeledig. Op de 
eerste plaats zorgt een ”RUN”-instruktie er- 
voor, dat het scherm wordt gewist en alle varia- 
belen nul worden en ten tweede, dat het pro- 
gramma vanaf de eerste regel start. Het zal dus 
duidelijk zijn, dat we een "BRUN" moeten voor- 
komen, als we een programma vanaf de band 
willen laden en het nadien verder willen laten 
lopen. Vandaar dat we in zo’n geval gebruik 
moeten maken van het >CONTINUE”-bevel. 

U kunt dit kontroleren aan de hand van het vol- 
gende programma, 


10 FDR 1=1 TO 108 
20 PRINT AT 21,61 
50 SCROLL 
46 NEXT 1 


Als u dit programma door middel van een 
“RUN” -instruktie door de machine laat uitvoe- 
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ren, zult u opmerken dat het scherm wordt vol- 
geschreven met hele getallen van 1 tot en met 
100, 

Druk nu op een bepaald moment de 
*BREAK”-toets in en noteer het laatste op het 
scherm geschreven getal. Sluit nadien de recor- 
der aan en zet hem in de opneem-stand. 

Toets vervolgens: 


SAVE "TEST" 


іп. Laat de recorder lopen en druk de ”newli- 
ne”-toets in. Als het opnemen klaar is, laat u 
het bandje terugspoelen en schakelt de compu- 
ter uit, zodat het programma uit het geheugen is 
verdwenen. Schakel de machine weer in en geef 
het bevel: 


LOAD "TEST" 


Start de recorder in de weergeef-functie en geef 
een “newline”. Als het programma in het ge- 
heugen zit, schakelt u de recorder uit, maar u 
gebruikt in plaats van een "RUN", nu een 
“CONTINUE” -instruktie. 

Het gevolg is, dat de machine gewoon verder 
gaat met het produceren van getallen alsof er 
niets is gebeurd, Het eerstvolgende getal uit het 
rijtje wordt op het scherm geprint! 

Dit is een zeer interessante ontdekking, want 
door middel van deze ”ЗАУЕ”- en ”СОМТ!- 
NUE”-techniek kunt u het schrijven van сеп 
zeer lang programma op ieder gewenst moment 
onderbreken, het voorlopige resultaat op band 
bewaren, dit later weer in het geheugen inlezen 
en nadien verder gaan met het afwerken van 
het programma. U kunt zelfs door middel van 
een "GOTO”-instruktie naar een willekeurige 
regel van het programma gaan, zonder dat dit 
kwalijke gevolgen heeft voor de inhoud van de 
variabelenzone van het geheugen. 

Toch heeft deze techniek een belangrijk nadeel. 
Hoewel het programma verder gaat vanaf het 
punt waar het is afgebroken, geldt hetzelfde 
niet voor de scherminhoud. Dat wordt veroor- 
zaakt door het feit dat elke BASIC-regel, die 
wordt ingetoetst en direkt uitgevoerd (dus zon- 
der regelnummer en niet deel uitmakend van 
een programma), het scherm wist. 

Toets maar eens het volgende bevel in. 


LET 4-0 
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Na het indrukken van de "newline”-toets wordt 
het scherm gewist! Hetzelfde gebeurt. helaas, 
na het gebruik van een "SAVE”-instruktie, AL 
vorens de computer dit bevel uitvoert en het ge- 
heugen op de band opneemt, wordt het scherm 
gewist. En uiteraard start de machine na een 
“CONTINUE” met dit zelfde lege scherm! 
Toch is er wel een oplossing voor dit probleem 
te verzinnen, Zowel ”SA VE” als ”LOAD” kun- 
nen als normale programmaregels worden toe- 
gepast en dan hebben zij niet het wissen van het 
scherm tot gevolg. Bovendien heeft deze metho- 
de nog een tweede voordeel. Als u cen pro- 
gramma, dat als gevolg van een in een pro- 
gramma opgenomen ”SAVE”-instruktie op de 
band was gezet, weer in het geheugen laadt, zal 
na het laden dit programma gewoon verder 
gaan, dus zonder gebruik te maken van een 
“CONTINUE”! 

De regel die als eerste wordt uitgewerkt is die, 
welke volgt op de "SAVE”-instruktie. 


Deze eigenschap van onze computer is zeer nut- 
tig, want we kunnen nu gedeeltelijk uitgewerkte 
programma’s rustig op een band opnemen en 
nadien weer inlezen, zonder dat de oude 
scherminformatie verloren gaat! Bovendien 
kunnen we nu programma’s ontwerpen, die 
zichzelf automatisch op een hepaald moment 
op de recorder opnemen! 

Het volgende programma is een goed voorbeeld 
van hoe dat in de praktijk gaat. 


16 FOR 1=1 ТО 100 

20 PRINT AT 21,651 

36 SCROLL 

36 IF 1=20 THEN SAVE "TEST" 
50 NEXT 1 


Na een “RUN” zal de computer alle getallen 
van Ì tot en met 20 op het scherm gaan schrij- 
ven. Nadien zal het programma zichzelf op de 
band gaan opnemen! Wél moet u er natuurlijk 
voor zorgen, dat de recorder op dat moment 
loopt. Vandaar dat u er verstandig aan doet de 
recorder te starten op het moment dat de ma- 
chine getal 15 op het scherm print. 

Nadat de computer het getal 20 op het scherm 
heeft gezet, ziet u het bekende schermbeeld, dat 
altijd verschijnt als de machine bezig is met ge- 
gevens naar de recorder te zenden. 

Nadat alles op hand staat, gaut de computer 


door met het uitwerken van het programma, 
alsof er niets is gebeurd! 

De getallen 21, 22, enz. worden op het scherm 
geschreven. Spoel de reeorder terug en schakel 
de computer uit, zodat alle informatie over dit 
programma uit het geheugen is verdwenen. 
Laad nadien het op de band opgenomen pro- 
gramma op de gebruikelijke manier weer in de 
computer. 

De machine gaat gewoon door met het uitprin- 
ten van getallen, maar bovendien verschijnt het 
oude schermbeeld weer op de heeldbuss! 

Het gebruik van ”SAVE” еп ”LOAD” als nor- 
male programmaregels heeft een nog niet ge- 
noemd voordeel. 

U kunt niet alleen een string” als naam voor 
een programma gebruiken, maar ook een volle- 
dige “string”-uitdrukking. Alle onderstaande 
regels zijn dus geldig. 


SAVE A$ 
SAVE "PROG"+5TRS (1) 
LOAD Map 


Hoewel “SAVE” en “LOAD” zeer veelzijdig 
zijn, kunnen we de ”SAVE”-instruktie niet op- 
nemen in een subroutine. 

Het ”GOSUB”-gedeelte van het geheugen 
wordt immers niet op de band gezet en bijge- 
volg zal, na het herladen van het programma in 
het geheugen, de eerstvolgende "RETURN” er 
voor zorgen dat het programma stopt en een 
foutmelding op het scherm verschijnt. 


Het opslaan van gegevens 

Nu we weten hoe de ”SAVE”-instruktie de in- 
houd van de variahelenzone van het geheugen 
op de hand zet, is het schrijven van een pro- 
gramma waarmee we gegevensbestanden kun- 
nen opnemen en weergeven niet meer zo moei- 
lijk. 

Als voorbeeld behandelen we een statistisch 
programma, waarmee we cijferreeksen kunnen 
invoeren, kunnen manipuleren en veranderin- 
gen aanbrengen en bovendien op band kunnen 
opnemen voor later gebruik. De technieken die 
we in dit statistisch programma gaan toepassen, 
zijn algemeen bruikbaar voor het behandelen 
en op band opnemen van gelijk welke soort in- 
formatie. 

We zullen dit programma opbouwen aan de 
hand van de technieken die we in het vorige 


hoofdstuk hebben hestudeerd. Met andere 
woorden: de methode van de ”stapsgewijze ver- 
fijning” komt nu echt aan bod! 

Allereerst moeten we dus een vrij vage indruk 
van het gewenste programma op papier zetten. 
Het zal duidelijk zijn, dat er een subroutine no- 
dig is voor het inlezen van de cijferreeks in een 
“array”. Daarnaast moeten we door middel van 
een tweede subroutine het getallenbestand be- 
werkbaar maken en door middel van een derde 
de gegevens opslaan op de band. Als de, op 
deze ”ЗАУЕ” volgende instruktie een "GOTO 
begin programma” is, dan zal het programma 
na het opnieuw in het geheugen inschrijven 
vanaf het begin starten met de gegevens van de 
vorige ”RUN” іп het geheugen. 

De gegevens die we op de band zetten, zijn een 
kombinatie van echte gegevens (de getallen die 
we intoetsen) en programmaregels. Bij de ZX81 
kan dat ook niet anders. Programmeurs die ge- 
wend zijn met andere machines te werken, zul- 
len dat een tamelijk vreemde eigenschap van 
onze ZX81 vinden. Zij zijn immers gewend aan 
het volledig gescheiden behandelen van pro- 
gramma’s en gegevens. 

Na even doordenken blijkt echter, dat er voor 
de manier waarop de ZX81 dit doet erg veel te 
zeggen valt. 

Waarschijnlijk zullen andere construkteurs deze 
benadering in de toekomst ook gaan volgen. 
Het grote voordeel van het mengen van het pro- 
gramma en de gegevens, die in dat programma 
moeten worden verwerkt, is, dat men niet twee 
verschillende namen hoeft te gebruiken en te 
onthouden, namelijk één voor het programma 
en één voor het gegevensbestand. Het nadeel is 
dat het tamelijk moeitijk is gegevens van het 
ene naar het andere programma over te schrij- 
ven. 

Het kost ook meer tijd om wijzigingen in het 
bestand aan te brengen. Men moet namelijk 
eerst het volledige programma van de band in 
het geheugen inlezen! 

Toch kunnen we deze nadelen opheffen met 
behulp van ”РЕЕК”- en ”POKE”-instrukties 
en onze kennis van de geheugenstruktuur van 
de machine, Zo zou u gegevens van het ene 
naar het andere programma kunnen overschrij- 
ven door de volledige variabelenzone van het 
geheugen over te zetten naar de vrije-RAM. Bij 
het ”LOAD”-en van een nieuw programma іп 
de machine blijft dit geheugengedeelte immers 
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buiten schot en nadien kunnen we weer van de 
vrije-RAM terug naar het variabelendeel. 


In de praktijk gaat dat echter allemaal niet zo 
eenvoudig en zolang we maar voldoende ge- 
heugenruimte ter beschikking hebben, kunnen 
we heel wat doen zonder dit zeer exotische soort 
spitsvondigheden te hoeven toepassen. 

Het statistisch programma werkt goed, zolang 
we de hoeveelheid opgeslagen gegevens niet 
uitbreiden, Maar dat is nu net een van de voor- 
naamste toepassingen van het werken met gege- 
vensbestanden! Laat ons daarom eerst eens kij- 
ken wat het probleem is als we de hoeveelheid 
informatie willen vermeerderen. Alvorens we 
gegevens in de computer kunnen invoeren, 
moet het programma eerst een ”аггау” reserve- 
ren om de gegevens te kunnen onderbrengen. 
Het zal duidelijk zijn, dat we dit ”array” niet 
langer moeten maken dan noodzakelijk is voor 
het opslaan van de verwachte hoeveelheid gege- 
vens. We willen geen tijd verliezen aan het op 
de band opslaan van ongebruikte ”array”-ele- 
menten! м 
Een van de eerste vragen, die we het program- 
ma aan de gebruiker moeten laten stellen is dus 
hoeveel gegevens er te verwachten zijn. Aan de 
hand van het antwoord zal het programma een 
”атгау” met de juiste lengte vrij maken. Zolang 
het aantal ingevoerde gegevens in dat “array” 
past, is er niets aan de hand. Maar wat als we 
méér gegevens willen invoeren? We moeten dan 
de lengte van het “array” gaan aanpassen. We 
zouden dit kunnen doen door rechtstreeks in- 
grijpen in de variabelenzone van het geheugen. 
Gelukkig staat er ook een zeer eenvoudige pro- 
grammeertechniek ter beschikking. Als het oor- 
spronkelijke aantal variabelen gelijk was aan 
PN” en we willen ”М” extra variabelen opne- 
men dan kunnen we een nieuwe ”аггау” kreë- 
ren. Door de instruktie: 


DIM E(N} 


worden alle gegevens van de oorspronkelijke 
”array” (die we bijvoorbeeld ”Г” noemen) 
overgebracht naar een nieuwe “array” ”Е”. Na- 
dien kunnen we aan ”D” een nieuwe, grotcre, 
dimensie toekennen door: 


DIM рМ) 
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Dit grapje kunnen we bij de ZX81 toepassen, 
omdat zijn ”DIM”-instruktie iets andere сіреп- 
schappen heeft dan de standaard BASIC 
“DIM”, Als men de afmetingen van een reeds 
bestaande ”аггау” aanpast, wist de computer de 
bestaande “array” uit en vervangt deze door 
cen nieuwe, waarvan de lengte niet gelijk hoeft 
te zijn aan die van de originele. 

Nadat we de afmetingen van ”D” hebben aan- 
gepast aan de nieuwe hoeveelheid gegevens, is 
het een koud kunstje de in "E" opgeslagen oude 
gegevens ”N” in de eerste "NIT elementen van 
de nieuwe ”аггау” ”D” te kopiëren en de ge- 
bruiker naar de nieuwe informatie ”M” te vra- 
gen. Nadien mogen we echter niet vergeten het 
geheugendeel, door "E" gebruikt, weer vrij te 
maken door: 


DIM EC) 


Natuurlijk is dit een vrij omslachtige manier om 
de hoeveelheid gegevens aan te passen, die bo- 
vendien traag is en veel geheugenruimte kost, 
maar alle andere beschikbare systemen zijn bij 
de 7Х81 zeer gekompliceerd en niet zonder 
problemen in praktijk te brengen. 


Het statistisch programma 

Na deze inleiding kunnen we heginnen aan het 
ophouwen van het grootste programma uit dit 
boekje. We zullen veel van de reeds in de vorige 
hoofdstukken uitgelegde principes terugvinden 
en daarnaast kennis maken met enige nieuwe 
theorieën. Dit programma is meer dan alleen 
maar een demonstratie-voorbeeld;, we kunnen 
er echt wat mee doen en bovendien kan het de 
basis vormen van zeer uitgebreide statistische 
programma’s, 

Wat biedt dit programma ons? Het menu”. be- 
horende bij dit programma, geeft ons een zeer 
overzichtelijke samenvatting van alle mogelijk- 
heden. 


Enige toelichting, 

Met het programma kunnen we gegevens in de 
computer invoeren (gang (1) van het menu); 
met deze gegevens als basis een aantal simpele 
statistische herekeningen uitvoeren (gang (5)), 
zoals: het bepalen van de minimum- en maxi- 
mumwaarden, het gemiddelde, het verschil tus- 
sen minimum en maximum, de standaardafwij- 
king, enz. 


STATISTIEKEN 


(1) МАМЕ INFORMATIE 

(2) НЕК WILLEKEURIGE GETALLLEN OP 
(3) MANIPULEER MET GEGEVENS 

{4} WEEN INFORMATIE OP 

(3) BEREKEN STATISTISCHE WAARDEN 
(8) TEKEN HISTOGRAM 

(7) STOP 


TEK HET GEWENSTE NUMMER IW 


Daarnaast kunnen we de gegevens grafisch in 
de vorm van een histogram gepresenteerd krij- 
gen (gang (6)). Dit is een grafiek, die met recht- 
hoeken aangeeft hoe het totale gebied tussen de 
minimum- en maximumwaarden in een aantal 
intervallen is verdeeld en laat zien hoeveel van 
de ingevoerde waarden binnen ieder interval 
vallen, Uiteraard kunnen we door middel van 
gang (4) van het "menu" de ingevoerde gege- 
vens op de band opnemen. Met behulp van 
gang (2) kunnen we de computer een aantal 
willekeurige getallen laten opwekken, die we als 
“gegevens” kunnen behandelen waarmee we 
het programma kunnen testen en de werking 
tonen zonder zelf een aantal gegevens te hoeven 
invoeren. 

Tot slot geeft gang (3) van het menu ons de 
kans met de ingevoerde gegevens te manipule- 
ren of, zoals de gebruikelijke ”Engelse” vak- 
term luidt, te ”editten”, 


Alvorens we het programma gaan bespreken, 
zullen we nog wat dieper ingaan op de verschil- 
lende faciliteiten en wel aan de hand van de 
tekst, die telkens op het scherm wordt geschre- 
ven bij de keuze uit dit “menu”. Als we "edit 
data” kiezen. antwoordt de computer met het 
“edit-menu”’, 


MAWLPULEREN MET GEGEVENS 


11) GEGEVENS BESTAND 

(2) WIJZIG GEGEVENS 

(3) WIS GEGEVENS 

(4) VOEG GEGEVENS TOE 
(5) TERUG NAAR HODFDMENU 


TIK HET GEWENSTE NUMMER IN 


Dit programma biedt dus vier ”edit”-mogelijk- 
heden. De eerste, “list data”, zet alle gegevens 
op het scherm. Er ontstaat dan volgend staatje 


LIJST BEGINT BIJ? í 
LIJST EIWDIGT BĲ? 19 


GEGEVEN WAARDE í = 
GEGEVEN WAARDE 2 = 
GEGEVEN WAARDE 3 
GEGEVEN WAARDE 4 
GEGEVEN WAARDE 5 
GEGEVEN WAARDE 5 
GEGEVEN WAARDE 7 
GEGEVEN WAARDE В = 
GEGEVEN WAARDE 9 = 
BEGEVEN WAARDE 10 = í 


DRUK EEN TOETS IN VOOR VERVOLG 


noen nn 


2 
i 
5 
2 
И 
5 
4 
2 
$ 


Met de "alter data”-gang kunnen we de waarde 
van een willekeurig gegeven veranderen. De 
computer vraagt eerst het volgnummer van het 
gegeven, print daarna de momentele waarde en 
vraagt nadien de nieuwe waarde. 


WELK GEGEVEN MOET GEWIJZIGD? 4 
HUIDIGE WAARDE = 2 
WIEUWE WAARDE = 5 


DRUK EEN TOETS IN VDDR VERVOLG 


Met “delete data” kunnen we есп deel van het 
bestand wissen. De computer vraagt in dat ge- 
val het volgnummer van het begin en het einde 
van het te wissen gebied. 

De “add data”-gang van het "edit menu” zet 
het reeds genoemde systeem in werking, waar- 
mee de cfmeting van de ”array” aan de nieuwe 
hoeveelheid gegevens wordt aangepast. De ma- 
chine vraagt eerst het aantal nieuwe in te voe- 
ren gegevens en gaat nadien aan de slag. Omdat 
dat nogal wat tijd vergt, print de computer tus- 
sendoor enige mededelingen op het scherm, zo- 
dat we er zeker van zijn dat hij niet in slaap is 
gevallen! 


HDEVEEL GEGEVENS WORDEN TOEGEVOEGD? 10 
WACHT, TERWIJL 1K RUIMTE MAAK, 

BIJNA KLAAR 

KLAAR VOOR МІРІНЕ GEGEVENS 

GEGEVEN WAARDE 11 = 
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Kiezen we “calculate statistics” uit het hoofd- 
“menu”, dan berekent de computer de reeds ge- 
noemde statistische waarden en zet zc overzich- 
telijk op het scherm: 


AANTAL NAARDEN=4@ 
MAXIMUM=10 

MINTMUN=1 

REEKS=9 

GEM] DOELDE=8 

VERSCHIL=18, 651282 
STANDAARD AFWIJKING=4, 24858 


DRUK EEN TOETS IN VOOR VERVOLGEN 


Het intoetsen van gang (6) uit het hoofd” menu” 
levert het onderstaande prentje op. 


HOEVEEL INTERVALLEN 710 
MAXIMUM WAARDE= 11 
MINIMUM NAARDE= 1 


[и Сары 


De computer vraagt het aantal intervallen. de 
minimum- en maximumwaarden en produceert 
daarmee een histogram, waaruit onmiddellijk 
valt af te leiden hoe de waarden van de inge- 
voerde gegevens over het totale gebied zijn ver- 
deeld, 

Gang (4) van het hoofd-”menu”, tenslotte, pro- 
duceert onderstaande tekst op het beeldscherm: 


DRUK EEN TOETS IN VOOR VERVOLGEN 


STOP EEN BLANKO CASSETTE IN 
DE RECORDER 
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WELKE NAAM GEEFT U AAN HET 
FROERAMNA 7 
TEST 


DRUK SPEEL EN DPNEEMTOETSEN IN 
DRUK DAARNA EEN NILLEKEURIGE TOETS ІМ 
OP НЕТ TOETSENBORD 


Zoals u ziet, een zeer nuttig programma! 

Nadat het programma van de cassette in het ge- 
heugen is geladen, moeten we ofwel de gege- 
vens intoctsen, ofwel de computer zélf cen aan- 
tal willekeurige getallen laten berekenen. 
Nadien kunnen we steeds vanuit het hoofd- 
“menu” een van de faciliteiten kiezen, cr mee 
werken, terug gaan naar het hoofd-”menu” сп 
dezelfde of een andere faciliteit kiezen. Als we 
de gegevens en het programma op band willen 
zetten, volstaat het de juiste gang uit het hoofd- 
"menu" te kiczen. 

Een laatste opmerking alvorens we het pro- 
gramma presenteren. Het programma stopt niet 
automatisch, maar na het op de band zetten van 
alle gegevens kunnen we de machine met een 
gerust hart uitschakelen. Als u nieuwe gegevens 
in het bestand wilt invoeren, is het voldoende 
het programma weer in het geheugen te laden 
met het gebruikelijke bevel "LOAD”, gevolgd 
door de gekozen programmanaam. Het pro- 
gramma start nadien automatisch en alle gege- 
vens staan weer ter beschikking. 

Zo, en nu het programma, dat uit niet minder 
dan 259 regels bestaat! 


10 REM STATISTISCH PROGRAMMA 


5% CLS 

910 PRINT ТАВ S "З TATISTIEKEN" 
520 PRINT AT 6,0 

530 PRINT "(1) NIEUWE INFORMATIE" 

540 PRINT * (2) NEK NILLEKEURIGE GETALLEN ПР" 
356 PRINT (5) MANIPULEER MET GEGEVENS" 

566 PRINT "(4) NEEM INFORMATIE DP" 

570 PRINT "(5) BEREKEN STATISTISCHE WAARDEN" 
580 PRINT "(&) TEKEN HISTOGRAM" 

590 PRINT "(7) STDP" 

600 PRINT АТ 21,9;"TIK HET GEWENSTE NUMMER IN"; 
618 INPUT SEL 

624 IF SEL= 1 THEN GDSLIB 3690 

538 IF SEL= 2 THEN 60518 1000 

640 IF SEL= 3 THEN GOSLIE 4000 


850 IF SEL= 4 THEN GOTO 1500 1650 ELS 


660 IF SEL= $ THEN GOSUB 5500 1660 SAVE A$ 
670 IF SEL= ë THEN GDSUB 5000 1670 БОТО 16 
ЕВӘ IF SEL= 7 THEN STOP 
696 БОТО 506 ` 2000 LET №6 
2010 LET 528 
000 CLS 2020 LET L=0(1) 
@1@ PRINT "NILLEKEURIGE GETALLEN“ 2030 LET HL 
1020 PRINT “AANTAL?"; 2040 FOR I=1 TD N 
1030 INPUT N 2050 LET M=M+D(I) 
040 PRINT N 2060 IF Lë) THEN LET Lët) 
1650 DIM DEN) 2070 IF HDI) THEN LET Wei 
060 PRINT AT 3,@;"GEBROKEN OF HELE GETALLEN? G/H"; — 2080 NEXT I 
1070 INPUT A$ 2090 LET МЕМ/М 
BA IF AS(1)¢3"6" AND ІЗ ОН" THEN БОТО 1060 2100 FOR I=1 TD N 
1090 PRINT AS 2110 LET S=S+(D CIM #40 (1)-М) 
160 LET Т=0 2120 NEXT I 
1116 IF AS="H" THEN LET T=1 2130 LET S=S/(N-1) 
120 PRINT AT 4,@:"LAAGSTE WAARDE"; 214% RETURN 
130 INPUT L 
140 PRINT L 2508 CLS 
1150 PRINT "HODGSTE WAARDE"; 2510 PRINT "AANTAL HAARDEN= ":N 
160 INPUT H 2520 PRINT “MAXIMUM "5H 
174 PRINT H 2538 PRINT "MINTMUME ";L 
1186 IF НХ. THEN БОТО 1216 2540 PRINT "REEKS= ";H-L 
1198 PRINT *HODGSTE<LAAGSTE" 2550 PRINT "GEMIDDELOE= "3M 
1290 БОТО 1126 2560 PRINT "VERSCHIL= "45 
1219 FOR Tei TON 2570 PRINT "STANDAARD AFWIJKING= ";SQR(S) 
122 LET D(I)-RNOŁH-L+T)+L 2580 БОТО 8900 
1230 IF Tei THEN LET D(D=INT DCD 
1240 PRINT AT 26,0; “GEGEVEN WAARDE *;1;" = МІ 1000 CLS 
1258 SCROLL 3010 PRINT "INVOER GEGEVENS? * 
1260 NEXT 1 3020 PRINT "HOEVEEL WAARDEN ? "; 
1278 GOTD 8900 2820 INPUT М 
3046 PRINT N 
1500 CLS Я 30508 DIN OCN) 
1510 PRINT "STOP EEN BLANKO CASSETTE IN" 3089 FOR 1=1 TON 
1520 PRINT "DE RECORDER" 3070 PRINT AT 21,0: "WAARDE ";1;* = "5 
1538 PRINT 3000 INPUT D) 
1540 PRINT "WELKE NAAN GEEFT U AAN НЕТ" 3990 PRINT DU) 
1550 PRINT "PRDGRAMMA2*; 3100 SCROLL 
1560 INPUT A$ 3110 NEXT 1 
1570 PRINT AS 3120 PRINT "INVOER GEGEVENS YDLTOOID" 
1580 PAUSE 25 3130 SCROLL 
1596 PRINT “DRUK SPEEL EN ОРМЕЕМТОЕТВЕМ IN" 3140 GOTO 8900 
1600 PRINT "DRUK DAARNA EEN WILLEKEURIGE TOETS IN" 
1618 PRINT "ОР HET TOETSENBORD" 4000 CLS 
1626 IF INKEY$="" THEN БОТО 1620 1010 PRINT TAB 5; 
1630 PRINT "TOT ZIENS” "MANIPULEER MET GEGEVENS" 
1640 PAUSE 50 4024 PRINT AT 5,0 


45 


4638 PRINT "(1) GEGEVENS BESTAND" 
4040 PRINT "(2) NIJZIG GEGEVENS" 
4050 PRINT "(3) NIS GEGEVENS" 

4068 PRINT "(4) VOEG GEGEVENS TOE" 
4070 PRINT "(5) TERUG NAAR HOOFDMENU" 
4880 PRINT АТ 21,@;"TIK HET GEWENSTE NUMMER IN* 
4090 INPUT EO 

4100 IF ED=I THEN 6098 4200 

4116 IF ED=2 THEN GOSUB 4500 

4120 IF ED=3 THEN 50508 4600 

4136 IF ED=4 THEN 50518 4800 

414@ IF ED=5 THEN RETURN 

4150 GOTD 4000 


4200 CLS 

4216 PRINT “LIJST BEGINT BĲ 2% 

4228 INPUT L 

4230 PRINT L 

4240 PRINT "LIJST EINDIGT BIJ (-I = ЕТЇЙ?"; 

4258 INPUT H 

4260 IF HEB THEN LET HEN 

4270 PRINT H 

4280 IF LOH THEN GOTO 4206 

4298 IF LON OR HON OR 121 OR НСІ THEN GOTD 4290 
4300 FOR I=L ТОН 

4510 PRINT AT 20,0; "GEGEVEN NAARDE *;1;" = ";D(D 
4520 SCROLL 

4330 IF INTUI-L+1)/20)t70=(1-L+I)THEN GOSUB 8900 
4340 NEXT I 

4358 БОТО 8900 


4500 CLS 

4510 PRINT “WELK GEGEVEN MOET GENIJZIGD?"; 
4520 INPUT I 

4530 IF KI OR DN THEN GOTO 4500 

4540 PRINT I 

4550 PRINT "HUIDIGE NAARDE= "3D(1) 

4560 PRINT “NIEUWE WAARDE= "; 

4576 INPUT DET 

4580 PRINT DU) 

4590 БОТО 8900 


4608 CLS 

4610 PRINT "WISSEN VANAF "; 
4620 INPUT L 

4630 PRINT L 

4640 PRINT "EINDIGEND 8149; 
4650 INPUT H 

4460 PRINT H 

4676 IF ML THEN GOTO 4600 
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4688 IF HON OR MI OR LON OR LO) THEN GOTD 4500 
4690 PRINT 

4790 PRINT “WISSEN VANAF ";L;" TOT "3H 
6718 PRINT "IS DIT CORRECT J/N "3 

8729 INPUT AS 

4730 PRINT A$ 

4749 IF АНОН THEN RETURN 

475% FOR I=H+1 TON 

4768 LET D(L+I-H-1)=D(I 

4779 NEXT 1 

4790 LET N=N-H+L-I 

4790 RETURN 


4800 CLS 

4810 PRINT "HOEVEEL GEGEVENS NORDEN TOEGEVOEGD? *; 
4829 INPUT H 

4830 PRINT М 

4840 DIM EEN) 

4856 PRINT *NACHT,TERNIJL ІК RUINTE МААК, * 
4869 FOR 1-1 TON 

4870 LET Een 

4888 NEXT I 

4890 PRINT "BIJNA KLAAR" 

4900 DIN (NM) 

4919 FOR LI TON 

4926 LET D(ID=E(D 

4930 NEXT I 

4940 PRINT “KLAAR VOOR NIEUWE GEGEVENS" 
4950 DIM EC) 

4960 FDR I=N+I TO Net 

4979 PRINT AT 21,0; "БЕБЕЧЕМ WAARDE "313" ="; 
4980 INPUT DID 

4990 PRINT DCT) 

5000 SCROLL 

5919 NEXT I 

5020 PRINT "GEGEVENS INVOER VOLTOOID" 
5939 SCROLL 

5040 LET Кен 

5060 БОТО 8900 


5500 CLS 

3519 PRINT "REKENEN' 
3520 GOSUB 2000 
559 GOTO 2500 


5000 CLS 

5818 PRINT “HOEVEEL INTERVALLEN? *; 
8929 INPUT М 

5030 PRINT М 

4040 PRINT "MAXIMUM NAARDE= "s 


6058 INPUT H 
8968 PRINT H 

8070 PRINT "MINIMUM HAARDE= "y 
6888 INPUT L 

2090 PRINT L 

2198 IF KL THEN GOTO веде 

8110 LET De (H-LI/M 

6129 GOSUB 7000 

6130 FOR 1=1 TO М 

6140 PRINT AT 21,03 INT(L#100}/1005 TAB 5; 
6150 IF H(I}=0 THEN GOTD 6190 
A166 FOR J=1 TO H(1)/F425 

6178 PRINT "U"; 

6188 NEXT J 

2190 SCROLL 

6200 LET L=L+D 

6210 NEXT I 

6220 SCROLL 

4230 БОТО 8900 


7000 DIM Hit) 

7010 FOR 1=1 TD N 

7020 LET J=(D(1}-L}/(H-L) M+ 
7830 LET J=INT J 

7040 IF КІ OR JOM THEN GOTO 7000 
7038 LET Hid) HG) +1 

7980 NEXT I 

7970 LET F=6 

7680 FDT 1811008 

7090 IF РЕНО) THEN LET FA) 
7190 NEXT I 

7119 RETURN 


8706 PRINT AT 21,0; 

“DRUK EEN TOETS IN VOOR VERVOLGEN" 
9910 IF INKEY$="" THEN GOTO 8910 
8920 RETURN 


Uiteraard is dit programma veel te lang om alle 
details uitvoerig te bespreken. Het geheel 1s zeer 
overzichtelijk met een groot aantal subroutines 
opgebouwd. Een lijstje van deze subroutines en 
hun taak, vormt een uitstekende plattegrond 
om de weg in het geheel te vinden. 

De meeste subroutines zijn vrij eenvoudig en 
gemakkelijk te hegrijpen. Als wc ons alles voor 
de geest halen wat we tot nu toe hebben ge- 
leerd, zullen ook de iets ingewikkeldere delen 
duidelijk worden. 

Toch enige opmerkingen, 


regelnummers taak van de subroutine 


10 naam van het programma 
500- 690 het hoofd-”menu” 

1000-1270 berekenen van willekeurige getallen 

1500-1670 het "SAVE”-en van programma en 
gegevens 

2000-2140 de statistische berekeningen 

2500-2580 het uitprinten van de berekeningen 

3000-3140 de gegevensinvoer 

4000-4150 het edit-”menu” 

4200-4350 edit-gang (1), uitprinten van gege- 
vens 

4500-4590 edit-gang (2), gegevens wijzigen 

4600-4790 edit-gang (3), gegevens wissen 

4800-5060 edit-gang (4), uitbreiden ”array” 

5500-5530 berekenen en printen statistische 
grootheden 

6000-6230 tekenen van het histogram 

7000-7110 berekenen inhoud van de interval- 
len 

8900-8920 wachten op toetsdruk om het pro- 


gramma te vervolgen. 


De regels 1500-1670 transporteren de gegevens 
en het programma naar de band. Er wordt geen 
gebruik gemaakt van een subroutine, maar van 
een “GOTO” in regel 650. Zoals we weten is 
dat noodzakelijk, omdat het automatische 
“RUN”-nen van het programma niet werkt als 
de “SAVE” in een subroutine is opgenomen. In 
subroutine 4200 zorgt regel 4330 ervoor, dat de 
machine па iedere 20 pge-”SCROLL”-de 
schermregels pauzeert. Door middel van suh- 
routine 4800 worden nieuwe gegevens aan het 
bestand toegevoegd, volgens het reeds bespro- 
ken systeem. 

De technieken die in de subroutines 6000 en 
7000 worden gebruikt voor het opbouwen van 
het histogram zijn nieuw. Subroutine 7000 telt 
het aantal waarden dat binnen ieder interval 
valt door de instruktie van regel 7020. Als u zich 
voorstelt dat de intervallen vanaf 1 worden ge- 
nummerd van links naar rechts, dan zal met de 
vergelijking het nummer worden berekend van 
het interval, waarbinnen een bepaalde waarde 
valt. Met dit intervalnummer wordt nadien de 
waarde van de bijbehorende ”H”-waarde met 
één verhoogd. 

Zodoende vinden we in ”Н()” het aantal waar- 
den dat binnen interval ”I” valt. Door middel 
van subroutine 6000 print de machine voor ie- 
dere "HOT маагде het juiste aantal vierkantjes 
op het scherm. 
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Er kunnen maximaal 25 blokjes op het scherm 
worden getekend. Dit is dus de lengte van de 
langste kolom en voor iedere eenheid in een 
”H”-waarde wordt bijgevolg 25/”F” blokjes op 
het scherm getekend. Hierbij staat "P" voor het 
aantal waarden in de langste kolom. Voor ie- 
dere waarde van ”Н” moeten dus ”Н(Г)*25/Е” 
blokjes worden getekend, hetgeen door de re- 
gels 6160 tot en met 6180 wordt verzorgd. 

Op deze vrij ingewikkelde manier zorgen we er- 
voor, dat de kolommen van het histogram nooit 
kunnen “overlopen”. Er zijn een heleboel de- 
tails die we onbesproken hebben gelaten. De 
beste manier om het programma volledig te le- 
ren beheersen, is er in de praktijk mee te wer- 
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ken, het te verbeteren en aan te passen aan uw 
specifieke wensen. 

Dat aanpassen gaat, door de modulaire op- 
bouw, vrij eenvoudig. Enige suggesties: het toe- 
voegen van een tabel, waarin de lengte van alle 
kolommen van het histogram wordt gegeven; 
het programma zo wijzigen dat met meer dan 
één kolom kan worden gewerkt; het kiezen van 
de kolom waarop we de statistische berekenin- 
gen willen toepassen en (alleen voor de gevor- 
derden!) het uitbreiden met subroutines, waar- 
mee we de diverse kolommen met elkaar 
kunnen vergelijken en spreidingsdiagrammen 
kunnen opstellen. Enige basiskennis van statis- 
tisch rekenen is hiervoor noodzakelijk! 


7. GETALLEN FORMEREN 


Hoewel het overdreven zou zijn om het een сгп- 
stige tekortkoming te noemen, heeft de ZX81 
als nadeel dat er geen systemen bestaan om vat 
te krijgen op de manier waarop getallen op het 
scherm worden geschreven, Als u het bevel 
“PRINT A” geeft, kunt u niet voorspellen hoe- 
veel cijfers er voor en achter de komma zullen 
verschijnen en nog minder waar die komma zal 
worden geprint. Het enige wat u kunt doen, is 
door middel van een “PRINT ТАВ”- of 
“PRINT AT”-instruktie de schermlokatie van 
het eerste cijfer van het getal vastleggen. Mis- 
schien vraagt u zich af, wat er zo belangrijk is 
aan het kunnen ingrijpen in de manier waarop 
de computer getallen uitschrijft. Toch ligt het 
antwoord op die vraag voor de hand: we kun- 
nen er meer overzichtelijke en minder mislei- 
dende resultaten mee verkrijgen. 

Als u bijvoorbeeld een heleboel getallen onder 
elkaar hebt geprint en ze nadien wilt lezen, is 
dat veel gemakkelijker als alle komma's onder 
elkaar staan! Verder is het onzin om de machi- 
ne het resultaat van een berekening tot 10 cij- 
fers achter de komma te laten uitprinten, want 
de herekening is toch maar tot drie cijfers na de 
komma nauwkeurig, 

Kortom, werken met getallen en cijfers eist in- 
grijpen door de programmeur. Hoewel de 2Х81 
geen instrukties, om de manier waarop getallen 
op het scherm worden geschreven volledig te 
kunnen sturen, ter beschikking heeft, kunnen 
we loch vergelijkbare resultaten krijgen door 
een aantal subroutines op te stellen. 


Afronden en inkorten 

Het gevaar van te veel cijfers na de komma als 
resultaat van een berekening is reeds genoemd. 
De suggestie wordt gewekt dat de berekening 
tot het laatste cijfer toe nauwkeurig is, wat niet 
per definitie zo hoeft te zijn! Toch komt het vrij 
vaak voor dat de computer als resultaat van een 
vrij simpele berekening voor twee getallen met 
een paar cijfers na de komma, een getal levert 
met het maximale aantal cijfers waartoe de ma- 
chine in staat is na de komma. Bovendien is het 
een niet algemeen bekend feit, dat een digitale 
computer berekeningen slechts met een beperk- 


te nauwkeurigheid uitvoert en dat de uitkomst 
steeds minder in overeenstemming is met de ge- 
gevens die we in de berekening hebben ge- 
bruikt, 

In feite zouden we dus regels moeten opstellen, 
waaruit we voor ieder soort berekening precies 
kunnen afleiden hoe nauwkeurig de resultaten 
zijn en hoeveel cijfers na de komma nog be- 
trouwbaar. Maar daar zijn nauwelijks exacte re- 
gels voor te geven! De beste benadering is uit te 
gaan van de praktische situatie en te bekijken 
waarvoor we een resultaat gaan gebruiken. Zo 
is het kompleet waanzin om het geschatte 
brandstofverbruik van een centrale verwarming 
als volgt door de computer te laten uitprinten. 


NDDIGE AANTAL LITERS OLIE= 192. 34983723 


Waarschijnlijk zal uw brandstofleverancier u al- 
leen maar meewarig aankijken als u 
10234983723 liter olie bestelt! Kortom, we mo- 
gen programmaresultaten niet als op zichzelf 
staande gegevens opvatten, maar als groothe- 
den die de mens ten dienste staan. 

Om nog even terug te komen op dat brandstof- 
verbruik, Het is al even zinloos het brandstof- 
verbruik van diverse installaties met elkaar te 
vergelijken in de vorm van een tabel, uitgeprint 
met getallen tot op 10 cijfers na de komma. Het 
resultaat zal er alleen maar onoverzichtelijk 
door worden. 

Kortom, we moeten getallen gaan inkorten. Als 
we gebruik maken van de “INT”-functie gaat 
dat zeer eenvoudig, 

Toets het volgende programma in. 


19 FOR №) TO 10 

29 LET V=RND 

38 PRINT "БЕТА = ":N; TAB 15; 
48 HR 1000 

5@ PRINT 

bO NEXT N 

78 STOP 


1004 LET DIB=1G%4N 
1019 PRINT INT (VKDIG)/DI6; 
1026 RETURN 
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Na een "RUN" print dit programma een reeks 
getallen op het scherm, met steeds meer cijfers 
na de komma. 

Suhroutine 1000, die verantwoordelijk is voor 
het inkorten van de getallen, kan in elk pro- 
gremma worden toegepast. ”V” is het te printen 
getal еп ”N” het gewenste aantal cijfers na de 
komma. We kunnen de werking van dit pro- 
gramma het eenvoudigst toelichten aan de hand 
van een voorbeeld, Stel dat ”V” gelijk is aan 
0,123 en ”М” gelijk is aan 2. Uit regel 1000 
volgt, dat ”DIG” gelijk is aan 10**2, of met an- 
dere woorden gelijk aan het kwadraat van 10, 
dus 100. Het vermenigvuldigen van ”У” met 
100 levert 12,3 op, de "INT”-functie houdt al- 
een het gehele deel, dus 12, over, Deling van 
dit resultaat door ”DIG” geeft de oorspronkelij- 
ke waarde terug aan ”V”, maar nu ingekort tot 
het gewenste aantal decimalen, dus als 0,12. 
Wél moeten we er rekening mee houden dat 
hoewel “N” het maximale aantal cijfers па de 
komma bepaalt, het best mogelijk is dat een re- 
sultaat met minder cijfers na de komma op het 
scherm verschijnt. 

Dat blijkt bijvoorheeld al uit het resultaat van 
het vorige programma, waar in principe het 
aantal cijfers na de komma van | tot en met 9 
zou moeten oplopen, maar waar soms minder 
decimalen zijn afgedrukt. 


DIGITS=} 2.6 

DIGITS =2 9.71 
DIGITS=3 2.364 
212115 =4 @.30397 
DISITS=S @.23226 
DIGITS=G KE EECH 
DIGITS=7 2,.6664561 
DIGITS=8 D. 95474151. 
DIGITS=S ©. 55560608 
DIGITS=10 в. 17260852 


Het nadeel van deze subroutine is dat zij lange 
getallen inkort door het “afhakken” van een 
aantal cijfers. terwijl het over het algemeen ge- 
bruikelijk is dat er wordt afgerond. Bij afronden 
kijkt men naar het cerste cijfer dat wegvalt. Is 


50 


dat 5 of groter, dat wordt het vorige cijfer met 
één eenheid verhoogd. Het getal 0.126 wordt 
volgens de besproken subroutine “afgehakt” tot 
0.12, maar zou volgens de regels van het afron- 
den 0,13 worden. 

We kunnen subroutine 1000 vrij eenvoudig 
aanpassen aan de wetten der afronding. Regel 
1010 wordt dan: 


1816 PRINT INT (VEDIG+, 5) 7016; 


Als u hetzelfde getallenvoorbeeld op deze for- 
mule loslaat, zult u het toegepaste afrondings- 
principe snel begrijpen. 


Het uitlijnen van de komma 

Als u het vorige programma een aantal keren 
laat topen, zult u meestal niet de mooie drie- 
hoek zien, waartoe het programma in principe 
in staat is, Vaker zult u een resultaat verkrijgen 
dat er vrij slordig uitziet. 


DIGITS= 1 а. 4 
DIGITS= 2 2-25 
DIGITS= 3 0.127 
BIGITS= + „авав 
DIGITS= 5 82576 
DIGITS= 6 0.223493 
DIGITS 7 М. 
DIGITS= 8 а.35104859 
DIGITS= 9 . 8652141235 
BIGITS= ia 8.і2482941 


Om dit schoonheidsfoutje te verbeteren, vol- 
staat het een subroutine te ontwerpen, waarmee 
we de positie van de komma op het scherm 
kunnen vastleggen, natuurlijk in kombinatie 
met het afronden van te veel cijfers na de kom- 
ma. 

Toets het volgende programma in. 


10 LET Wi 

26 INPUT V 

30 PRINT TAB 10; 
4 GOSUB 3000 

56 LET V=V#I008RND 
tb 6070 36 


3000 PRINT " 
УАН 10). 10И 
3918 RETURN 


“(1 TD M-(V>1) SINT (EN 


Na сеп “RUN” verschijnt het volgende resul- 
taat op het scherm, 


. 203 
. 999006653 
2.524560% 


2 
65293. 
4938575.5 


Dit programma lijkt tamelijk gekompliceerd, 
maar is toch snel te begrijpen als we het gaan 
ontleden in de diverse delen. Met de regels 10 
tot 60 worden testgetallen opgewekt, die we in 
subroutine 3000 bewerken. Met de variabele 
“М” kunnen we het aantal printposities voor de 
komma vastleggen. ”У” is uiteraard weer het 
getal waarop we de subroutine gaan toepassen. 
Om er zeker van te zijn dat voor ieder getal de 
komma op dezelfde plaats op het scherm ver- 
schijnt, is het noodzakelijk een variabel aantal 
spaties voor het echte getal op te nemen. Als we 
bijvoorbeeld een maximaal aantal printposities 
van 5 in ”M” vastleggen en we moeten het getal 
22,12 weergeven, dan zal het programma dit ge- 
tal op het scherm schrijven als: 
spatie/spatie/spatie/2/2/,/1/2 

Als het getal ”N” cijfers voor de komma heeft, 
dan moeten er ”М”—”М” spaties voor het getal 
worden opgenomen om er zeker van te zijn dat 
de komma op de gewenste plaats wordt geprint. 
In formule-vorm: 

PRINT " ' "(1 TO KM 

Vervolgens moeten we de waarde van ”N” be- 
rekenen. Probeer het onderstaande programma 
uit met een aantal ”V”-waarden tussen 1,0 en 
1000000,0. 


18 INPUT V 
20 PRINT V, INT(LN V/LN 16) 
30 5070 16 


Als resultaat print de computer voor iedere 
waarde van ”У” een cijfer, dat gelijk is aan het 
aantal cijfers voor de komma, minus 1. Een en 
ander is het gevolg van enige simpele wiskundi- 
ge bewerkingen, Zoals men weet levert "LOG 
У” een getal op waarmee men 10 moet verhef- 
fen om de originele waarde "VI te krijgen. In 
formulevorm: 

”V=10*«(LOG У)”. Als we door de ”INT”- 
functie alleen maar het gehele gedeelte van 
deze bewerking beschouwen, is het resultaat 
een cijfer dat gelijk is aan het aantal cijfers voor 
de komma minus | in het originele getal ”У”. 
Het enige probleem is, dat de ZX81 niet be- 
schikt over de “LOG"-functie (logarithme met 
grondtal 10), maar over de”LN”-functie (loga- 
rithme met grondtal е), Gelukkig bestaat ег een 
simpel verband tussen beide logarithmische uit- 
drukkingen, namelijk: 

"LOG V = LN V / LN 10”, 

We kunnen dus nu de ’vormgevende” regel uit 
het programma als volgt formuleren: 

PRINT * "CL TD M-INT(LN V/LN 1013 V 

Dit lijkt al aardig op regel 3000 van het vorige 
programma, Alleen de termen "(NI en 
(NI ontbreken пор, Deze termen zijn 
noodzakelijk, omdat de 2Х81 getallen kleiner 
dan len groter dan 0,1 op een afwijkende ma- 
nier uitprint en met deze termen kunnen we het 
aantal spaties aanpassen aan deze eigenaardig- 
heid van de machine. 


De "PRINT USING"-instruktie 

Met de behandelde systemen voor het inkorten 
en afronden van getallen en het uitlijnen van de 
komma, kunnen we de meeste moeilijkheden 
bij het uitprinten van de getallen, wel de baas. 
Sommige BASIC-dialecten hebben een zeer 
werkzame instruktie, namelijk de ”PRINT 
USING”, waarmee men alle problemen rond 
het op de juiste manier op het scherm printen 
van cijferreeksen in één klap kan oplossen. We 
kunnen een subroutine opstellen, waarmee we 
bijna alle mogelijkheden van de ”PRINT 
USING” kunnen nabootsen en die we kunnen 
gebruiken bij het schrijven van nieuwe pro- 
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gramma’s of bij het verbeteren van reeds be- 
staande. 

Door de ”PRINT USING” wordt het formaat 
van een getal bepaald door gebruik te maken 
van een soort “prentje” van het getal, een 
prentje dat in een “string” wordt opgeslagen. 
Zon “prentje” zal er in de meeste BASIC-dia- 
lecten als volgt uitzien: ” ### . #4”. Hier- 
door wordt het getal opgebouwd uit drie cijfers 
voor en twee cijfers na de komma. Het getal 
3,123 zal dan als 

/spatie/spatie/3/,/1/2/ worden geprint. 

Er zijn een heleboel andere symbolen die we sa- 
men met het ” #”-teken kunnen gebruiken voor 
ket vormen van het “prentje”, maar сеп van de 
meest toegepaste is wel het ”$”- of ”£”-sym- 
bool. Als u een van beide symbolen voor het 
“prentje” opneemt, wordt het geldsymbool 
naast het meest linkse cijfer van het getal weer- 
gegeven. 

Zozal ”$ ### BRR ” het getal 3,1234 als 
/spatie/$/3/,/1/2/3/ weergeven. 

Met dit ’prentjes”-systeem kunnen we op een 
zeer eenvoudige manier zowat alle problemen 
op het gebied van het formeren van getallen op- 
lossen. Als u bijvoorbeeld geen komma op het 
scherm wilt zien, dan past u het prentje” aan 
tot” 888 >. 

Getallen, die te groot zijn voor de door het 
*prentje” geboden ruimte, worden zonder enige 
“format”-bewerking op het scherm geschreven. 


Een uitgebreide "PRINT USING”-subroutine 
voor de 2Х81 is zeer lang, vandaar dat we een 
enigszins vereenvoudigde versie gaan opstellen, 
waarmee we het ”prentje” kunnen opbouwen 
door middel van de symbolen ” #”,”.” en ”$”, 
Wéi moeten we het gebruikelijke ” #”-symbool 
vervangen door een "e", omdat de 2Х81 niet 
beschikt over het ” #”-teken. 

De ”РКІМТ USING”-subroutine gaat verge- 
zeld van een klein testprogramma en luidt als 
volgt. 


16 LET ЕЗ, 
Ж PRINT TAB 9;U$ 

зе INPUT V 

40 GOSUB 2000 

Dë LET Wey H Ga 

88 PRINT 

78 6070 26 
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2000 LET H$=STR$ INT V 

7019 LET L$=(STR$(V}) {LEN H$+1 TO) 

2020 IF ns THEN IF L$(1)="."THEN LET L$ 
=L${2 10) 

2030 LET S$=U$(1) 

2040 IF U$(1)0O"F" AND US(1)<)"S* THEN LET 
Bg 

2050 LET F=0 

2080 LET Kä 

2070 LET Nee 

2086 FOR I=1 TO LEN U$ 

2098 IF Dën, "THEN LET F=l 

2100 IF US(I)="¢"AND Fe@ THEN LET НЕМ 

2110 ІРІ (ПЕ ЧАН) Fel THEN LET ВЕ 

2120 NEXT 1 

2130 IF Vë AND HS="@" THEN LET H$="" 

2140 LET Н$=5$+Н$ 

2150 IF LEN HSM THEN 6070 2178 

2168 LET HS=" "UL TD МУЧЕН HH ein 

2170 IF FO THEN LET HS=HS+", " 

2188 LET L$=L$-"0000000000000" 

2198 IF М THEN LET НЕНСИ TO N) 

2708 FRINT H$ 

2210 RETURN 


Het formaat van het “prentje” wordt in de 
“US”-string opgeslagen іп regel 10. Door mid- 
del van de regels 20-70 wordt aan ”V” een aan- 
tal testgetallen toegekend, die nadien in subrou- 
tine 2000 worden bewerkt. Eerst wordt echter 
het getal in ”V” omgezet in een ”string” door 
*STRS” en in twee delen gesplitst. De cijfers 
voor de komma gaan naar "HS" (regel 2000) еп 
de cijfers na de komma gaan naar "Lä" (regels 
2010-2020). 

Noteer het gebruik van de "ТЕ... THEN, IF 
... THEN” konstruktie in regel 2020! Dit heeft 
dezelfde resultaten als "IF ... AND 
THEN”, maar is noodzakelijk omdat in dit spe- 
cifieke geval de tweede voorwaarde 
(LS(H) =”.”) alleen uitgewerkt kan worden als 
de eerste voorwaarde (L$ <> ” ”) opgaat. De 
uitdrukking "IF L$ <> ” ” AND LS(I) THEN 
..-” zal een foutmelding opleveren als “L$” ge- 
lijk is aan nul, want dan bestaat 71,8(1)” immers 
niet! 

De variabele ”S$” wordt gebruikt voor het op- 
slaan van de glijdende geldsymbolen in de for- 
mat-string ”U$”. 

Als er geen geldsymbool wordt gebruikt, zal 
”S$” nul worden (regels 2030-2040). In de re- 


gels 2050-2120 wordt het aantal cijfers voor de 
komma (M) en het aantal cijfers achter de kom- 
ma (М) geteld in de format-string “U$”. De va- 
riabele ”S” wordt nul als er geen komma wordt 
teruggevonden, In regel 2020 wordt de nul voor 
de komma verwijderd als het getal kleiner is 
dan 1 of als er in het formaat van het “prentje” 
geen rekening mee is gehouden. 

Regel 2030 is verantwoordelijk voor het opne- 
men van het geldsymbool vóór het getal, indien 
aanwezig, De spaties, die het getal aanvullen tot 
de afmetingen die in het “prentje” zijn vastge- 
legd, worden op ongeveer dezelfde manier aan 
het getal toegevoegd als beschreven bij het uit- 
lijnen van de komma. Dit gebeurt in het laatste 
deel van het programma door de regels 2150 en 
2160. Als een komma wordt verlangd, wordt 
deze door regel 2170 in het geheel opgenomen, 
Nadien wordt het gedeelte na de komma aange- 
vuld met nullen (regel 2180 en vervolgens afge- 
kapt op het gewenste aantal posities door regel 
2190, 

Tot slot zorgt regel 2200 voor het op het scherm 
printen van het in de goede vorm gebrachte ge- 
tal, 


Drie voorbeeldjes van hoe men een cijferreeks 
met deze subroutine kan formeren. 


30. 9278 
2328.9732 
54565.0150 
357921753. 1099 
62866099. 0000 


Жж 

2:258: 

EG E 
0.2472 £0143 
23.0431 £15.18 
2067. 3304 £333.24 
59288.7480 £96608.67 
3023603. 2000 £9170571.30 


Het berekenen van rente 

Als voorbeeld van hoe we de “format”-subrou- 
tine in de praktijk kunnen gebruiken, volgt nu 
een programma, waarmee we een tabel op het 
scherm kunnen printen, die een overzicht geeft 
van de jaarlijkse opbrengst als we iedere maand 
een vast bedrag tegen een vaste rente op een 
spaarrekening zetten. 

Dit programma geeft niet alleen een fraai voor- 
beeld van het formeren van cijfertabellen, maar 
we kunnen het zowaar in de praktijk gebruiken 
voor het vergelijken van verschillende spaarsys- 
temen. 


Om de zaak niet al te gekompliceerd te maken, 
wordt er echter wel een vereenvoudigde rente- 
berekening toegepast. Als u iedere maand een 
bedrag van "A" gulden spaart, dan is het jaar- 
resultaat gelijk aan ”А*12” gulden, Stel het ren- 
tepercentage gelijk aan ”R” en de som van ge- 
spaard geld en rente per jaar gelijk aan ”Т”. 
Het gebruikte systeem gaat er dan vanuit, dat u 
per jaar een bedrag van “T+R/100” aan rente 
op uw rekening bijgeschreven krijgt. 

In dit programma maken we gebruik van de 
eerder gegeven subroutine 2000, die u dus in 
het programma moet opnemen! 


10 PRINT ТАВ В; ENTE BEREKENING" 
20 PRINT 

36 PRINT “HOEVEEL WILT U PER NAAND" 
40 PRINT “SPAREN 2"; 

58 INPUT A 

b0 PRINT A 

70 PRINT “HOEVEEL JAREN ?"; 

88 INPUT Y 

90 PRINT Y 

198 PRINT “RENTE PER JAAR " 

118 PRINT “IN PROCENTEN 7%; 

128 INPUT R 

138 PRINT R 

140 LET B=128A 

150 PRINT 

160 PRINT “JAARLIJKS GESPAARD BEDRAG=";B 
176 LET T= 

188 FOR Kel ТО Y 

190 LET Tip 

208 LET E=TIR/100 

210 LET ТЕТЕ 

220 PRINT AT 28,0; "GESPAARD NA "; 
730 LET (ëtt: 
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290 LET V=K 
258 GOSUB 2000 

268 PRINT "JAAR"; TAB 20; 
270 LET EE. E 
280 LET V=T 

290 6DSU8 2000 

ТӨВ SCROLL 

310 NEXT К 

3% STOP 


Met regel 10 tot en met 110 wint de computer 
de nodige informatie in. Nadat het maandelijks 
gespaarde bedrag is omgezet in een jaartotaal 
(regels 140 - 160) berekent het programma het 
totaal gespaarde bedrag per jaar en print dit uit. 
Regel 190 telt deze uitkomst op bij het totaal, 
regel 200 berekent de nieuwe rente en regel 210 
telt de rente bij het vorige totaal op. Deze bere- 
keningen worden voor ieder jaar herhaald, tot 
”К” gelijk wordt aan ”У” (regel 180). De 
”vormgevings”-subroutine wordt gebruikt voor 
het opstellen van twee cijferreeksen. Enerzijds 
het aantal jaren, door middel van de regels 230- 
250, anderzijds het totaal bedrag in de regels 
270-290. 
Het resultaat ziet er dan ook zeer overzichtelijk 
uit. Vergelijk dit eens met het beeld dat ontstaat 
als niet van de 2000 subroutine was gebruik ge- 
maakt! 

Als u dit programma over een periode van 30 
tot 40 jaar laat lopen, zult u verbaasd zijn over 


54 


het eindkapitaal bij een maandelijks spaarbe- 
drag van slechts 50 gulden! 


RENTE BEREKENING 


HOEVEEL WILT U PER MAAND 
SPAREN 759 

HOEVEEL JAREN 220 

RENTE FER JAAR 

IN PROCENTEN 21% 


JAARLIJKS GESPAARD BEDRAG 5400 
GESPAARD NA 1 JAAR Ғы0,00 
GESPAARD NA 2 JAAK [1596.60 
BESPAARD № 3 JAAR Р2184, 60 
GESPAARD NA 4 JAAR [3863.0 
GESPAARD NA S JAAR [4629.3 
GESPAARD NA b JAAR 25092,10 
GESPAARD МА 7 JAAR [261.53 
GESPAARD NA 8 JAAR [7547.68 
GESPAARD NA 9 JAAR [8952.45 
GESPAARD NA 18 JAAR [18518.70 
GESPAARD NA 11 JAAR F12230.57 
GESPAARD NA 12 JAAR [14115.62 
GESPAARD МА 15 JAAR [16184.99 
GESPAARD NA 14 JAAR [18453.48 
GESPAARD NA 15 JAAR [28969.85 
GESPAARD № 1h JAAR [25725.82 
GESPAARD NA 17 JAAR F24759, 50 
GESPAARD NA 18 JAAR F30095,45 
GESPAARD NA 19 JAAR 23574.68 
GESPAARD NA 26 JAAR [57861.50 


8. DE ZX-PRINTER 


De ZX-printer is een werkelijk ongelooflijk stuk 
gereedschap! Niet alleen kunnen we alles wat 
op het scherm staat zonder meer op papier ko- 
piëren en programma’s en gegevensbestanden 
uitprinten, maar met dit stukje ”hard-ware” 
kunnen we bovendien de afmetingen en resolu- 
tie van het scherm vergroten! 

Het uitbreiden van uw ZX81 komputer-systeem 
met een ZX-printer opent dus een geheel nieu- 
we reeks toepassingen! 


Hoe werkt de printer 

Alvorens we ons gaan verdiepen in deze nieuwe 
mogelijkheden willen we eerst iets vertellen 
over de manier waarop de printer werkt. De 
ZX-printer verdampt een dunne laag alumi- 
num, die is aangebracht op een ondergrond van 
zwart papier. Daar waar dat aluminium ver- 
dampt, komt het zwarte papier te voorschijn en 
verkrijgt men een beeld, dat zonder gebruik tc 
maken van inkt, toch als zwart op de alumi- 
niumkleurige ondergrond verschijnt. 

U kunt dit kontroleren door een stukje papier 
met een mesje te bekrassen. Overal waar u de 
aluminium laag wegkrast, komt het zwarte pa- 
papier voor de dag. De printer verdampt het 
aluminium door gebruik te maken van elektri- 
sche vonken. Als u de printer in een verduister- 
de ruimte laat werken, kunt u de lichtblauwe 
gloed van de vonkenregen onder het staafje, 
waarlangs het papier wordt afgescheurd. zien. 
De vonken worden geproduceerd door сеп aan- 
tal scherpe metalen pennen, die op een door 
een motor aangedreven riem zijn gemonteerd. 
Deze riem en de papiertransportrol worden ge- 
ijktijdig aangedreven en het resultaat is dat de 
metalen punten in horizontale lijnen over het 
papier bewegen. Tijdens dit aftasten van het pa- 
pier kan een vrij hoge, maar veilige elektrische 
puls aan een van de naalden worden aangelegd, 
waardoor een vonkje ontstaat, dut een zwart 
puntje in het papier brandt. Als we dus een let- 
ter op het papier willen schrijven, moeten we 
een aantal pulsen in de juiste volgorde en op de 
juiste tijden naar de juiste naalden sturen, waar- 
door het juiste patroon van zwarte puntjes op 
het papier verschijnt. 


Dank zij dit systeem is het niet alleen mogelijk 
letters weer te geven, maar letterlijk alle moge- 
lijke symbolen en vormen. We kunnen dus op 
de printer zowel grafieken met hoge resolutie 
weergeven als de volledige set kleine letters en 
dat enkel met BASIC-instrukties! 


Het printen met lage resolutie 

Het door de ZX81 gebruikte BASIC-dialect 
kent drie instrukties voor de printer: ”LLIST”, 
”LPRINT” en ”СОРУ”. 

De ”LLIST”-instruktie kan op precies dezelfde 
manier worden gebruikt als de gewone "LIST, 
instruktie, uiteraard met dit verschil dat in het 
ene geval het resultaat op papier verschijnt en 
in het andere geval op het scherm. De twee 
meest interessante instrukties zijn “LPRINT” 
en ”СОРҮ”. 

”LPRINT” wordt op dezelfde manier gebruikt 
als “PRINT”. U kunt ook hier met ”ТАВ”- en 
”AT”-instrukties de plaats bepalen waarop icts 
wordt geschreven. Er is echter één verschil: het 
papier doorloopt de printer slechts in één rich- 
ting. Hij kan dus niet worden teruggedraaid! 
Zodoende wordt een verwijzing naar een be- 
paalde regelpositie in ееп ”AT”-instruktie niet 
opgevolgd. Als u bijvoorbeeld: 


10 LPRINT AT 26,16; "5" 


intoctst, zal de printer een ”X”-symbool druk- 
ken op de tiende positie van de papierlijn, die 
op dat ogenblik in gebruik 15. We kunnen dus 
wel de horizontale positie van de te drukken 
tekst onder kontrole houden, maar de vertikale 
positie wordt alleen maar bepaald door het in 
één richting lopende papiertransport. 

Een en ander heeft wel als vervelende konse- 
kwentie dat we niet klaar zijn met alle 
”PRINT”-instrukties іп een programma te ver- 
anderen іп ”LPRINT” om er zeker van te zijn 
dat dit programma door de printer wordt ge- 
drukt. Gelukkig kunnen we dit lastige probleem 
oplossen door gebruik te maken van de 
“COPY” -instruktie; waarover later meer. 

Bij het gebruik van ”LPRINT”-bevelen moet u 
zich voorstellen dat u op de onderste regel van 
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het scherm werkt en na iedere regel een 
"SCHOLL" geeft. De printer werkt immers vol- 
gens een vergelijkbaar systeem. Het apparaat 
drukt een regel af, en het papiertransport kan 
opgevat worden als een automatische 
“SCROLL”! Het gevolg is dat programma’s die 
een schermbeeld opbouwen door eerst een regel 
te printen en nadien te scrollen. zonder proble- 
men via de printer op papier kunnen worden 
afgedrukt, door alle ”PRINT””s te vervangen 
door ”LPRINT”-instrukties en de ”SCROLL”- 
regels te verwijderen. Op deze manier kunnen 
we de cijferreeksen van het statistische en het 
renteprogramma eenvoudig op papier zetten. 
Het volgende programma, dat een sinusvormig 
verlopende kurve op het scherm zet, 


10 FOR ré ТО БІРІ STEP „5 
20 LET Y=(SIN(X)+1) И 

30 PRINT AT 21,7: "$" 

40 SCROLL 

56 NEXT X 


kan zonder meer worden aangepast aan de 
printer, door regel 40 te schrappen en de 
“PRINT” te vervangen door ееп ”LPRINT”. 
Het resultaat ziet er als volgt uit. 


Een *LPRINT” kan alle symbolen van deze 
ZX81 symbolenset op papier zetten en gedraagt 
zich precies zoals een ”PRINT”, Toch ontstaan 
er problemen als we getallen tussen 0,00001 en 
0,009999999 willen uit schrijven. De eerste nul 
wordt als "echte" nul geschreven, dus als 70”, 
maar de volgende als de letter O! Deze onheb- 
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belijkheid van de machine kunnen we omzeilen 
door in een ”LPRINT” alle getallen als 
“strings” op te nemen; dus door gebruik te ma- 
Кеп van de “STRS”-funktie, Gebruik dus in 
plaats van: 


1@ LPRINT A 
liever: 
10 LPRINT STRSCA) 


en dit soort schoonheidsfoutjes zullen zich niet 
meer voordoen. 

Hoewel de ”LPRINT”-instruktie dus erg han- 
dig is, zeker als we programma’s willen laten uit 
schrijven om ze gemakkelijk te kunnen korrige- 
ren, is de gemakkelijkste en meest belangrijke 
instruktie voor de printer de ”COPY”-instruk- 
tie. Met een “COPY” wordt de volledige 
scherminformatie overgedragen op het papier, 
waarbij het niet uitmaakt wat er allemaal op het 
scherm staat. U kunt gebruik blijven maken van 
de instrukties "PRINT AT” of ”PLOT/UN- 
PLOT” om het beeldscherm op te bouwen en 
alvorens verder te gaan met het volgende pro- 
grammadeel de beeldinhoud in zijn geheel 
overdragen op de papierstrook. U kunt dus als 
het ware programma’s opstellen zonder aan het 
bestaan van de printer te denken en nadien met 
de “COPY” een exacte kopie van het beeld ver- 
eeuwigen! 

We kunnen de "COPY”-instruktie op twee ver- 
schillende manier gebruiken. Als u tijdens het 
uitwerken van een programma de beeldinfor- 
matie wilt overdragen op papier, kunt u het 
programma stoppen door een “BREAK” en 
een “COPY ”-bevel geven, Nadat de printer de 
beeldinhoud heeft overgenomen, kan het pro- 
gramma door middel van de "CONTINUE" 
worden voortgezet, U moet er daarbij wel voor 
zorgen per ongeluk geen andere instruktie te 
geven, want daardoor wordt het vrij moeilijk 
het programma weer aan de praat te krijgen en 
bovendien zal het scherm hierdoor worden ge- 
wist en dan is een “COPY” zinloos! 

Vandaar dat de tweede manier om een 
“COPY” te gebruiken veel beter is, namelijk 
het standaard in het programma opnemen voor 
*COPY”-regels op de daarvoor aangewezen 
plaatsen. Als voorbeeld het volgende program- 
ma. 


18 FOR 1-1 TD 20 
20 PRINT RND 

30 NEXT I 

30 COPY 

% CLS 

88 GOTO 16 


De regels 10 tot en met 30 printen 20 willekeuri- 
ge getallen op het scherm, die nadien door de 
“COPY” in regel 40 automatisch worden over- 
genomen op de papierstrook. Het scherm 
wordt, eveneens automatisch, gewist en de vol- 
gende 20 getallen verschijnen op het scherm en 
daarna op papier. 


Met dit idee in ons achterhoofd, kunnen we be- 
staande programma’s zo gaan aanpassen dat de 
printer-mogelijkheden een integraal onderdeel 
van het geheel gaan vormen. 

Eerst bepaalt u die plaatsen waar het zinvol kan 
zijn de scherminhoud over te dragen op papier, 
dan voegt u op die punten de vraag “wilt u een 
schermkopie?” in en als de gebruiker met “а” 
antwoordt, wordt een ”СОРҮ”-гере! geakti- 
veerd. 

Op deze manier krijgt u steeds uitgeschreven 
kopieën zonder de ”LPRINT”-schoonheidsfout 
en bovendien is deze methode de enige manier 
om grafieken die met behulp van de ”PLOT/ 
UNPLOT”-instrukties zijn opgebouwd ор pa- 
pier te krijgen. 


Het printen met hoge resolutie 

Door het toepassen van enige simpele subrouti- 
nes kunnen we met de printer grafieken met 
hoge resolutie produceren, opgebouwd uit 256 
bij 256 punten en alle mogelijke door de gebrui- 
ker zelf samen te stellen symbolen, de zoge- 
noemde "user defined”-symbolen (afgekort tot 
”UD”-symbolen). De basis-ideeën іп deze para- 
graaf zijn afgeleid van de demonstratiepro- 
gramma’s in de handleiding die bij de printer 
wordt geleverd. Bovendien kunnen we deze 
subroutines toepassen voor het maken van ei- 
gen programma’s, 

Alvorens we de printer kunnen gebruiken in de 
hoge resolutie-modus moeten we een gedeelte 
van de machinecode, die is opgeslagen in het 
ROM-geheugen, gaan wijzigen. Hoewel het 
programmeren in machinecode eerst in hoofd- 


stuk 10 wordt behandeld, kunnen we er nu toch 
wel mee uit de voeten als we weten dat de 
”LPRINT”-definitie uit het. ROM-geheugen 
naar gelijk welk deel van de RAM-zone kan 
worden overgebracht en nadien gewijzigd, 
Natuurlijk moeten we dan wel eerst een deel 
van dat RAM-geheugen reserveren voor dit 
doel, zodat we er zeker van zijn dat onze BA- 
SIC-instrukties nooit in dat deel van het geheu- 
gen worden opgeslagen. Dat kan door het wijzi- 
gen van het adres dat ligt opgeslagen in 
”RAMTOP”, 


POKE 14389, 124 
NEW 


De resultaten van het printen met hoge resolu- 
tie kunnen we bewonderen aan de hand van het 
onderstaande programma dat een groot aantal 
willekeurige punten print. Het overschakelen 
naar de ”FAST”-mode is aan te raden! 


18 GOSUB 1000 
26 GOSUB 5000 
39 GOSUE 2000 
89 GOTO 20 


1600 IF PEEK 16388+2568PEEK 14389=31744 
THEN БОТО 1630 

1010 PRINT "GEHEUGEN NIET GERESERVEERD" 

1029 STOP 

1636 FOR 1-0 TO 112 

1040 POKE 31744+1,PEEK (2161+1) 

1050 NEXT 1 

1940 POKE 31880,63 

1978 POKE 31857, 201 

1880 RETURN 


2900 FOR K=% TO 31 
2010 POKE 14444+H,H 
2020 NEXT H 

2030 LET WIER 31744 
2040 RETURN 


3006 FOR I=1 10 5248 
3016 POKE 3225541, 255¢RNC 
3020 NEXT I 

3036 RETURN 
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Het resultaat: 


De machinecode, die de werking van de 
*LPRINT” vastlegt, wordt door middel van 
subroutine 1000 naar de gereserveerde RAM- 
zone overgebracht. Met de regels 1000-1020 
wordt de „RAMTOP” gewijzigd en het RAM- 
geheugen gereserveerd, 

Nadien zal de "FOR" Jus (regels 1030-1050) 
113 machinecodebytes overbrengen van 2161 
(ROM-gebied) naar 31744 (gereserveerde 
КАМ). Regel 1060 en 1070 ”РОКЕ”-еп de twee 
noodzakelijke wijzigingen in de machinecode. 
Door deze twee wijzigingen worden de 256 ge- 
heugenlokaties volgend op byte 32256 uitge- 
print. 

Subroutine 2000 1s verantwoordelijk voor het 
opstarten van het printproces. De regels 2000 
tot 2020 vormen een symbolenteller in het prin- 
tergeheugen, startend op lokatie 16444, Regel 
2030 luidt het printen in door een beroep te 
doen op de machinecode die door subroutine 
1000 is gevormd. Dat gebeurt door: 


USR" ADRES" 


Hiermee kunnen we de machine naar een ma- 
chinecode-subroutine sturen op een manier die 
te vergelijken is met de wijze waarop de "СО- 
SUB”-instruktie de machine naar een BASIC- 
subroutine stuurt. De enige komplicatie is dat 
“USR” een functie is — net zoals "SIN" of 
”COS” — die dus alleen maar als uitdrukking 
kan worden gebruikt. Dat is de enige reden 
waarom regel 2030 begint met "LET H=”. We 
zijn immers niet geïnteresseerd in de waarde die 
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in ”H” wordt opgeslagen. Ons enig streven is de 
machine naar de in lokatie 31744 opgeslagen 
machinecode te leiden! 

Subroutine 3000 verandert de inhoud van het 
geheugendeel dat door subroutine 2000 wordt 
uitgeprint door willekeurige getallen te 
”POKE”-en. Weet u het nog? 

Eén geheugenlokatie kan slechts getallen tussen 
0 en 255 opslaan, 

De werking van het programma moet nu duide- 
lijk zijn. 

Eerst wordt door regel 10 subroutine 1000 opge- 
roepen om de machinecode om te vormen. Na- 
dien haalt regel 20 subroutine 3000 tevoor- 
schijn, die de gehcugeninhoud op een 
willekeurige manier verandert. Tot slot komt 
subroutine 2000 opdraven op bevel van regel 30 
om de gegevens uit het geheugen te printen. Dit 
proces herhaalt zich steeds weer, tot u er genoeg 
van krijgt en de ?ВКЕАК” bedient. 

De drie genoemde stappen, namelijk het veran- 
deren van de machinecode, het opbouwen van 
een deel van het geheugen met de uit te printen 
informatie en het eigenlijke printen, zijn de fun- 
damenten van het werken met grafieken met 
hoge resolutie. De subroutines 1000 em 2000 
worden in alle in dit hoofdstuk beschreven pro- 
gramma’s in ongewijzigde vorm gebruikt. Wel 
eist ieder programma uiteraard een specifieke 
geheugeninhoud om te kunnen worden uitge- 
print, 


Het tekenen van een sinuskurve 

In het vorige programma hebben we de twee 
basis-subroutines 1000 en 2000 geïntroduceerd. 
Erg nuttig was het programma verder niet! Al- 
vorens we iets zinnigs met deze techniek kun- 
nen doen, moeten we eerst begrijpen hoc de in- 
formatie die we met subroutine 3000 in het 
geheugen ”POK E" cn zich verhoudt tot het uit- 
eindelijke resultaat op het papier. Helaas is dit 
nu net het moeilijkste punt van het werken mct 
grafieken met hoge resolutie! ledere keer dat 
subroutine 2000 in aktie komt, wordt het equi- 
valent van een volledige rij symbolen uitge- 
print. leder symhool wordt opgebouwd uit een 
matrix van 8 bij 8 punten. Een volledige regel 
symholen is bijgevolg samengesteld uit 32 x 8 
x & = 2048 punten. Hetgeen heel wat meer is 
dan de 256 geheugen lokaties, dic door subrou- 
tine 1000 worden gedefinieerd en door subrou- 
tine 2000 geprint! 


Dit verschil valt te verklaren uit het feit dat ie- 
dere geheugenlokatie in staat is de toestand (dat 
wil zeggen ofwel zwart, ofwel wit) van 8 afzon- 
derlijke punten te kontroleren. ledere geheu- 
genplaats bepaalt dus de toestand van een rij 
die uit 8 punten is samengesteld, 

Het meest voor de hand liggend zou zijn als de 
eerste 32 geheugenlokaties de toestand van de 
eerste rij van de informatie zouden bepalen. 
Dat is echter niet het geval. De eerste 8 geheu- 
genplaatsen bevatten de informatie van het eer- 
ste symbool, 

De volgende 8 geheugenplaatsen bepalen de sa- 
menstelling van het tweede symbool en zo ver- 
der. 

Overzichtelijk samengevat: 


eerste symbool ` tweede symbool 
rij | geheugenplaats 1 geheugenplaats 9 
rij 2 geheugenplaats 2 geheugenplaats 10 
Tij 3 geheugenplaats 3 geheugenplaats 11 
regel rij 4 geheugenplaats 4 geheugenplaats 12 
rij 5 geheugenplaats 5 geheugenplaats 13 
tij 6 geheugenplaats 6 geheugenplaats 14 
tij 7 geheugenplaats 7 geheugenplaats 15 
rij 8 geheugenplaats 8 geheugenplaats 16 


Hiermee zijn we echter nog lang niet aan het 
eind van de moeilijke toestanden! De manier 
waarop iedere geheugenplaats de status van een 
rij uit een symbool opslaat is ook niet mis! 

Moet een bepaalde punt uit zo’n rij als zwarte 
punt op het papier worden gedrukt, dan moet u 
de volgende codes "РОКЕ”-еп: 


puntuitderij 1 2 3 4 5 6 7 8 
128 64 32 16 8 4 2 1 


machinecode 


Enige voorbeeldjes: 

— als u de punt in de linker bovenhoek van het 
eerste symbool zwart wil maken, moet u 128 
in de eerste geheugenlokatie "POK E”-en; 

— als u de derde punt uit de tweede rij van het 
tweede symbool zwart wil laten printen, 
moet u 32 "POKE”-en in de tiende geheu- 
genplaats. 

Als u meer dan één punt zwart wil maken, moet 

u de som van de hij deze punten horende codes 

gaan ”РОКЕ”-еп. 

Als u bijvoorbeeld de vijfde en tweede punt uit 

de eerste rij van het eerste symbool zwart wil 

maken, moet и 64 + 8 = 72 In de eerste geheu- 
genplaats ”РОКЕ”-еп! 


Dit alles lijkt zeer ingewikkeld en nauwelijks 
bruikbaar in de praktijk. Gelukkig kunnen we 
door middel van enige simpele BASIC-regels 
steeds terugvinden welke geheugenlokaties er 
met wat voor code ge” POKE”-ed moeten wor- 
den om een bepaald puntenpatroon op te bou- 
wen. 

We weten nog dat een symbool bestaat uit 8 x 
8 punten, namelijk 8 rijen van 8 punten hori- 
zontaal en 8 kolommen van 8 punten vertikaal. 
Als u zich de 32 symboolposities van een regel 
voorstelt als opgebouwd uit 32 X & = 256 pun- 
ten per rij, genummerd van links naar rechts 
(kolomvolgnummer) en uit 8 kolommen, ge- 
nummerd van boven naar beneden (ryvolg- 
nummer), dan kan een willekeurige punt met 
rijvolgnummer ”Х” (horizontaal) еп kolom- 
nummer ”Y” (vertikaal) als een zwarte punt 
worden weergegeven. 


100 LET C=INT{X/8) 
116 LET Be?7-X+C#8 
129 POKE S2255+C8B+X, 2948 


Regel 100 berekent de symboolpositie en regel 
110 bepaalt de puntpositie in de symboolplaats. 
We hebben nu voldoende kennis vergaard om 
een sinusvorm (of gelijk welke andere wiskun- 
dige uitdrukking) op het papier uit te tekenen, 
Ook dit programma kan beter in de ”РАЗТ”- 
mode worden uitgedraaid! 


10 LET L=6 

20 GOSUB 1000 

30 FOR X=9 TD БІРІ STEP ,05 
46 LET Y=(S1N(X)41) 8127 

59 60508 3000 

66 NEXT X 

7@ STOP 


4600 LET Y=INT Y 

3010 LET K=INT(Y/8) 

3020 LET R=7-Y+Kt8 

3050 FOR 1-9 TD 51 

3040 POKE 522505 ПВН.,0 
3050 IF К=1 THEN POKE 32254+1$B+L, 208 
2060 NEXT 1 

3070 LET Let 

3080 IF L=B THEN GOSUB 2000 
3090 ІР L=B THEN LET L=0 
3100 RETURN 
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Wat het volgende beeld oplevert. 


— 
Y 
x 


De eerste regel (10) zet de rijen-teller ”L” op 
nul, Als ”L” gelijk wordt aan 8 hebben we 8 rij- 
en punten vastgelegd en wordt het tijd subrouti- 
ne 2000 op te roepen om dit deel van de grafiek 
uit te tekenen (regel 3070). Regel 20 bepaalt de 
machinecode-subroutine. Met de regels 20-50 
wordt de sinusfunctie uitgerekend voor waar- 
den tussen 0 еп 8*PI. De kurve wordt uitgeprint 
terwijl het papiertransport loopt, dus de sinus- 
waarde ”Y” wordt opgebouwd in de looprich- 
ting van het papier. 

De schaalwaarde van ”Х” doet niet ter zake 
omdat iedere nieuwe berekende waarde van 
”Ү” op de volgende regel wordt geschreven! 
”У” mag niet zo groot worden dat de kurve ge- 
deeltelijk buiten het papier valt, vandaar dat 
”У” zo wordt geschaald dat de laagste sinus- 
waarde 0 is en de hoogste 254, 

Ook nu gebruiken we subroutine 3000 voor het 
wijzigen van de geheugeninhoud, zodat het ge- 
wenste patroon van zwarte punten ontstaat. 
Voor iedere berekende sinuswaarde ”Y” wordt 
de symboolplaats en puntpositie bepaald. De 
volledige rij wordt gelijk gemaakt aan nul (re- 
gels 30303-3060), waardoor de vorige printin- 
formatie verdwijnt en het volgende punt op de 
juiste plaats wordt ge"POKE”ed (regel 3050). 
Met regel 3070 wordt de inhoud van de rijentel- 
ler met 1 verhoogd. 

Met deze basistechniek is het mogelijk grafie- 
ken van zeer hoge kwaliteit op het papier te 
drukken. U kunt nu diverse wiskundige uit- 
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drukkingen laten uittekenen en proberen gra- 
fieken te verfraaien door het aanbrengen van 
een assenstelsel, Wel moeten we toegeven dat 
deze techniek verre van gemakkelijk is en bo- 
vendien tamelijk traag werkt! 


Een kleine letter- of speciale symbolenset 

Met de behandelde technieken kunnen we de 
beschikbare symbolenset belangrijk uitbreiden. 
Een van de meest nuttige toepassingen is de uit- 
breiding met een kleine letterset. 

Het onderstaande programma vormt de basis 
van een tekstprocessor, die de beschikking heeft 
over zowel kleine letters als hoofdletters. 


16 GOSUB 1000 

26 6051 49% 

36 LET A$="ABCI" 

де GOSUB 2000 

50 FOR Р=1 TO LEN A$ 
68 LET С=С00Е A$(P)-37 
7% GOSUB 5000 

BO NEXT P 

99 GDSUB 2000 

109 STOP 


1000 IF PEEK [6380+2564PEEK 18389251744 
THEN GOTO 1030 

1019 PRINT “GEHEUGEN NIET GERESERVEERD" 

1020 STOP 

1030 FOR 1=0 TO 112 

1040 POKE 2174441, PEEK (2161+1) 

105% NEXT I 

1046 POKE 31860, 63 


1079 РОЖЕ 31857, 201 

1989 RETURN 

2000 FOR H=0 TO 31 

2010 POKE 16444+H,H 

2026 NEXT H 

2630 LET H=USR 31744 

2049 LET 150 

2056 RETURN 

3000 FOR 1-0 70 3148 

3010 РРОКЕ 32255+1,0 

3026 NEXT 1 

3030 RETURN 

5008 DIM L$(26,8} 

4010 LET L$(L)=" SCAIW"ACHRE (68)+"W " 

4020 LET L$(2)=" RNORNO"+CHR$ (120) +CHRS 
(6B) +CHR$(68)+CHRS (120)+" * 

4030 LET L$(3)=" SRNORNORNDS * 

4040 LET 1600) =" CAILAIW"+CHR$ (68)+CHR$ 
(68) +CHRS (120) 

4999 RETURN 

9000 FOR 1-1 708 

5010 POKE 22265+1+PID,COOE Let, 1) 

3020 NEXT 1 

5039 RETURN 


Een voorbeeld van dit programma. 
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De subroutines 1000 en 2000 worden weer op 
de bekende manier gebruikt voor het opbou- 
wen van de machinecodesubroutine en voor het 
uitschrijven van de inhoud van het geheugen- 
deel. Subroutine 4000 bepaalt het puntenpa- 
troon van ieder nieuw symbool dat u wilt bezi- 
gen. Het patroon voor het ”1”-4е symbool 


wordt opgeslagen in ”1$(1)” als een “string” 
van acht symbolen. 

Als u een nieuw puntenpatroon wilt vastleggen, 
moet u de vorm van het symbool uittekenen in 
een matrix van 8 bij 8 punten. Behandel rij voor 
rij en noteer de code van ieder zwart punt. Tel 
nadien alle codes bij elkaar op. Nadat u op deze 
manier alle & rijen onder handen hebt geno- 
men, ontstaat een lijstje van 8 getallen tussen 0 
en 255. leder getal vormt de code van het sym- 
bool dat in de “string” moet worden opgeslagen 
om het gewenste patroon van witte en zwarte 
punten te verkrijgen. Als we deze cijferreeks in 
de vorm van een ”string” willen opslaan, is het 
noodzakelijk ieder getal om te vormen tot het 
korresponderénde symbool door gebruik te ma- 
ken van de ”CHR$”-functie. 

Om plaats (en intoets-tijd) te besparen, is het 
aan te bevelen deze symbolen rechtstreeks van- 
af het toetsenbord in te voeren. U kunt dus be- 
ter een spatie intoetsen dan de uitdrukking 
”СНЕ$(0)”! 

De gang van zaken kan het best worden toege- 
licht aan de hand van een voorbeeld. Stel dat 
we de kleine letter a willen invoeren. Het pun- 
tenpatroon in de 8 bij 8 matrix en de korrespon- 
derende codes zijn: 


‚ ж + + 32 + 16 + 8 = 56 
. . * 4 
` A? „32 + 16 + 8 +4 = 60 
* + + + * 64 + = 68 
4. 4 жж 532 + 6+ 8+ = 60 
22404047422. 0 


Deze codes worden nadien omgezet in de vol- 
gende symbolen, door gebruik te maken van de 
string "L$(1)”: 


L$(1)=" SE4IW"+CHRE (bB) SENG 


Merk op dat, als er geen symbool is dat korres- 
pondeert met de symboolcode er niets anders 
opzit dan gebruik te maken van de "CHR$”- 
functie. Als u een sleutelwoord zoals ”LET” in 
de ”string” moet gebruiken, kunt u ofwel de 
”CHR$” gebruiken, ofwel het sleutelwoord 
rechtstreeks invoeren door "THEN in te toet- 
sen (voor de ”K”-kursor), nadien “LET” en tot 
slot de edit-toetsen gebruiken voor het wissen 
van de THEN”. 
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Nadat het puntenpatroon is opgebouwd in 
“L$” kunt u een reeks symbolen opslaan in 
”А8” (regel 30), waarna de regels 40-90 de nieu- 
we vormen in een regel op de printer zullen uit- 
schrijven, 

De manier waarop de standaard symbolenset 
korrespondeert met de nieuwe vormen wordt 
bepaald door regel 60. 

In dit geval komt “A” overeen met het patroon. 
dat ligt opgeslagen in ”L$(1)”. Regel 70 roept 
subroutine 5000 op, die het puntenpatroon in 
"LSC" opslaat in de symboollokatie р”. Na- 
dat alle puntenpatronen zijn behandeld zal cen 
beroep op subroutine 2000 ervoor zorgen dat de 
geheugeninhoud wordt uitgeschreven. 


Besluit 
Denk nu niet dat alle toepassingen van de kom- 
binatie ZX81 en ZX-printer in dit hoofdstuk 
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aan de orde zijn geweest! Er kan veel meer mee 
worden uitgevoerd! 

Zo zou u het programma voor de kleine letter 
symbolenset kunnen omzetten in een echte 
tekstprocessor met zowel kleine letters als 
hoofdletters. De tekst zou dan eerst op het 
scherm kunnen worden gezet met geïnverteerde 
symbolen op de plaats van de hoofdletters en 
normale op de plaats van de kleine letters. Na- 
dat het scherm vol staat, zou het programma 
alle symbolen omvormen tot respektievelijk 
hoofdletters en kleine letters, zodat de printer 
een stuk geschreven tekst aflevert, dat er uitziet 
zoals we dat gewend zijn. 

Een tweede projekt is het opstellen van een gra- 
fisch pakketje voor de ZX81, waarmee we wat 
gemakkelijker met technieken met hoge resolu- 
tie kunnen werken. 

De mogelijkheden zijn eindeloos, het initiatief 
ligt in uw handen! 


9. STATISTISCHE TECHNIEKEN 


VOOR GEVORDERDEN 


Willekeur is een fundamenteel gegeven bij het 
programmeren van spelletjes op een computer. 
De meeste boeken of handleidingen, die spel- 
letjes-programma’s beschrijven, gaan dan ook 
in het kort in op de mogelijkheden van het op- 
wekken van willekeurige getallen. We veron- 
derstellen dat de lezer van dit boek, ook al een 
enigszins gevorderde programmeur, (anders 
had hij niet de behoefte gehad de geheugenka- 
paciteit van zijn machine uit te breiden) niet 
onkundig is van de basis-technieken. 

Toch bestrijken deze basis-technieken maar een 
heel klein deel van alles wat gedaan kan wor- 
den met willekeurige getallen. Het werken met 
statistische programma’s is een van de belang- 
rijkste toepassingsgebieden van het serieuze 
computerwerk! 

In dit hoofdstuk behandelen we eerst de basis- 
technieken voor het opwekken van willekeurige 
getallen en vervolgens wat minder voor de hand 
liggende toepassingen van het werken met wil- 
lekeur, namelijk enige nuttige statistische pro- 
gramma's. 


Statistische verdelingen 

Stel dat we in een programma waarmee we 
weersverwachtingen willen simuleren, willekeu- 
rige temperaturen moeten opwekken. We kun- 
nen dit bijvoorbeeld doen op de manier die in 
de meeste boeken wordt beschreven: het totale 
gebied van aanvaardbare temperaturen in een 
aantal delen verdelen, ieder deel koppelen aan 
een hepaald getal en dan de computer getallen 
willekeurig laten berekenen. Een nadere studie 
van de "RND”-functie leert ons dat dit een ta- 
melijk omslachtige methode is, want met de 
“RND”-functie kunnen we getallen opwekken, 
die groter of gelijk zijn aan nul, maar kleiner 
dan 1. 

De volgorde van deze getallen is niet te voor- 
spellen en volstrekt willekeurig. In principe lig- 
gen er in het interval tussen 0 en 1 een oneindig 
aantal verschillende getallen, maar omdat de 
computer bepaalde afrondingen toepast, is dit 
aantal in de praktijk eindig, 

Met de "RND”-functie kunnen we dus aan een 


continue gebeurtenis een willekeurig verlopen- 
de waarde toekennen. 

Het volgende merkwaardige feit is, dat de 
”RND”-functie slechts één van de vele moge- 
lijkheden is om een willekeurige cijferreeks op 
te wekken. 

Iedere ”kansgenerator” zal op zijn specifieke 
wijze de willekeurige spreiding van de in het 
toegestane interval opgewekte getallen uitvoe- 
ren. De manier waarop de kans op het opwek- 
ken van een bepaald getal varieert kan grafisch 
worden voorgesteld in een zogenoemde kans- 
distributiegrafiek. Zo weten we dat de ”RND”- 
functie getallen in het interval 0 tot 1 opwekt en 
dat ieder getal even veel kansen heeft. 

De kansdistributiegrafiek voor de "RND”- 
functie ziet er dus als volgt uit. 


rob. 
i L. 


0 0.5 1.0 


Om voor de hand liggende redenen wordt deze 
distributie de ”uniforme distributie” genoemd. 
Een andere "kansgenerator” zou een distributie 
kunnen geven, die er zo uitziet. 


0 0.5 10 


Bij deze kansgenerator neemt de kans op het 
verkrijgen van een hepaald getal toe als dit ge- 
tal dichter in de buurt van de waarde 0,5 komt. 
Dit soort kansverdeling is zeer nuttig voor het 
simuleren van verschijnselen, waarbij een ge- 
middelde waarde waarschijnlijker is dan een 
extreme, Neem bijvoorbeeld het spelletje, waar- 
bij het de bedoeling is de verkoop van frisdrank 
te raden in de maand juli. 

De verkoop van frisdrank is deels afhankelijk 
van de temperatuur. We weten uit ervaring dat 
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het in de maand juli tamelijk warm kan zijn. 
Maar we weten ook dat er in juli koude en zeer 
warme dagen kunnen voorkomen. Driehoeks- 
distributie is dan een ideale manier om de tem- 
peratuur zo realistisch mogelijk in het spel te 
verwerken. U moet dan de volgende uitdruk- 
king gebruiken. 

2*M+*TRI 

waarbij ”M” staat voor de gemiddelde tempera- 
tuur in juli en “TRI” de nieuwe functie is, die 
getallen volgens de driehoeksdistributie opwekt. 
Dat we het resultaat nog eens met twee moeten 
vermenigvuldigen wordt veroorzaakt door de 
keuze van het totale interval van de distributie 
tussen 0 en 1. De meeste getallen zullen dus 
rond de 0,5 liggen en het is logisch dat de tem- 
peratuur zonder deze exta vermenigvuldigings- 
factor de helft zou zijn van de voor juli gelden- 
de normale temperaturen. 

Het probleem is echter dat er geen BASIC- 
functie ТЕР” ter beschikking staat! 

We moeten dus een subroutine gaan opstellen 
die ervoor zorgt dat getallen volgens de gewen- 
ste distributiekurve worden gegenereerd. 

Voor de driehoeksdistributie gaat dat vrij een- 
voudig. Als we twee getallen, die volgens de 
uniforme distributie van de "RND”-functie zijn 
gegenereerd bij elkaar optellen, ontstaat het ge- 
wenste resultaat. 

De formule voor de driehoeksdistributie luidt 
dus: 

LETT = (RND + RND)/2 

Uit de waarschijnlijkheidsrekening zijn een 
aantal zeer nuttige distributies bekend, die ech- 
ter niet zo gemakkelijk op onze computer zijn 
na te bootsen als de driehoeksverdeling. De vol- 
gende tabel geeft de voornaamste distributies 
en hun typische toepassingen. 

Uit deze soorten distributie een gemotiveerde 
keuze te doen, kan alleen na grondige analyse 
van het te programmeren probleem. 

Een uitgewerkt voorbeeld van de toepassing 
van de poisson-distributie volgt later in dit 
hoofdstuk. In de eerste plaats gaan we ons bezig 
houden met het opstellen van de subroutines 
nodig voor het nabootsen van de vijf genoemde 
distributies. 

De werking van deze subroutines te doorgron- 
den zonder kennis van de basisbeginselen van 
de waarschijnlijkheidsrekening is erg moeilijk. 
Maar ook zonder deze kennis kunnen we ze wel 
toepassen! 
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soort distributie ` typische toepassingen 


voor het simuleren van ”natuur- 
lijke” processen met meetfouten 

voor statistische berekeningen bij 
het nemen van monsters 

voor economische berekeningen, 
zoals het simuleren van wacht- 
tijden of tijdsduur tussen twee 
cliënten 

voor het simuleren van de kans 
dat een bepaald onderdeel uit 
een reeks niet aan de specifica- 
ties voldoet 

voor het simuleren van het aan- 
tal te verwachten cliënten in een 
bepaald tijdsinterval 


normale 


chi-kwadraat 


exponentieel 


binomiaal 


poisson 


Als u een inzicht wilt krijgen in de vorm van de 
distributies, kunt u de subroutine voor het op- 
wekken van willekeurige getallen in het statisti- 
sche programma vervangen door een van de 
volgende en telkens een aantal histogrammen 
laten uitprinten. Vergeet niet dat aan de para- 
meters geëigende waarden moeten worden toe- 
gekend. 


De normale distributie 

Omdat dit een van de belangrijkste statistische 
functies is, geven we twee subroutines. De сег- 
ste is gebaseerd op het centrale limiet theorema 
en geeft een benadering, die voor de meeste 
toepassingen nauwkeurig genoeg is. 


1000 LET 1-0 

1010 FOR I=! TON 

1020 LET 2=2+RN0 

1030 NEXT I 

1040 LET 1=S0R(S/N)T(242-N) 
1050 RETURN 


De nauwkeurigheid van deze formule neemt 
toe bij een stijgende waarde van ”N”. Bruikba- 
re waarden voor ”N” liggen tussen 20 en 50. De 
tweede subroutine is gebaseerd op de methode 
die door Box-Muller is ontwikkeld en wordt al- 
leen toegepast als er hoge eisen aan de nauw- 
keurigheid worden gesteld. 


1600 LET 2=SOR (-2$LN(RND) CIE (РІМ) 
1019 RETURN 


Voor beide subroutines geldt dat ”Z” een wille- 
keurig getal met een normale distributie is, met 
een gemiddelde waarde van nul en een stan- 
daardafwijking van 1. 


De chi-kwadraat distributie 
Als u cen distrihutie met twee vrijheidsgraden 
nodig heeft, kunt u hiervan gebruikmaken. 


1000 LET X1=-MLDG(RND) 


Meer algemeen, voor een distributie met een 
even aantal vrijheidsgraden (D = 2N), geldt: 


1000 LET Let 

1910 FOR 1-1 TO D 
1026 LET ІНЕН) 
1050 NEXT I 

1840 LET X=-24L0610) 


Om een oneven aantal vrijheidseraden op te 
wekken, kunnen we gebruik maken van: 


1000 LET Y=X+247 


waarbij geldt dat ”X” een willekeurig getal is 
met een chi-kwadraat distributie met 2N vrij- 
heidsgraden en Z normaal met een gemiddelde 
waarde van 0 en een standaardafwijking van 1. 


De exponentiële distributie 
Hiervoor staat de volgende subroutine ter be- 
schikking. 


100 LET Х=- (1/0) МЕМО) 
1816 RETURN 


waarbij ”X” voldoet aan de distrihutie: 
1 — EXP (-Г*Х). 


De binomiale distributie 

In deze subroutine heeft ”X” een binomiale dis- 
tributie, staat ”N” voor het totaal aantal gege- 
nereerde getallen en geeft ”P” de kans op suk- 
SES, 


1000 LET Cp 

1610 FOR I=t TON 

1026 IF RND2P THEN GOTO 1040 
1838 LET X=X+1 

1049 NEXT 1 

1950 RETURN 


De poisson-distributie 

Deze subroutine wordt gebruikt in het simula- 
tieprogramma, dat we verderop in dit hoofd- 
stuk zullen behandelen. 


1000 LET {=й 

1810 LET E=EXP A 

1020 LET Р=1 

1030 LETP=PERND 

1040 ТЕ PXE THEN RETURN 
1858 LET X=X+1 

1850 GOTO 1020 


Hierbij staat "X” voor een geheel getal tussen 0 
en oneindig, met als distributie M**X*EXP(— 
M)/X!. 


Monte Carlo integratie en de berekening van de 
waarde van PI 

Tot nu toe hebben we nog geen nuttige toepas- 
sing van het gebruik van willekeurige getallen 
gegeven. 

Er zijn toevalsgetallen nodig om voorziene en 
onvoorziene gebeurtenissen te kunnen simule- 
ren. Een voorbeeld van zo’n simulatie vindt u 
aan het einde van dit hoofdstuk. 

We kunnen met toevalsgetallen een reeks inge- 
wikkelde wiskundige vergelijkingen oplossen. 
Deze methode staat bekend onder de naam 
"monte carlo”, en zoals we zullen zien, niet 
voor niets genoemd naar het beroemde casino. 
Stel dat we de oppervlakte, die wordt omsloten 
door een curve bepaald door een wiskundige 
vergelijking, moeten herekenen. De meest ge- 
bruikelijke manier om zo’n probleem op te los- 
sen, is het toepassen van wiskundige fomules, 
Soms is het toch nog moeilijk om met klassieke 
wiskundige theorieën tot een oplossing te ko- 
men en moeten we een geheel andere benade- 
ringswijze uitvoeren. De integratie-theorieën 
gaan uit van een flink brok moeilijke wiskunde, 
maar het gebruiken van het gezond verstand 
leidt soms tot zeer verrassende oplossingen. Zo 
ook hier! 


We nemen de uitdrukking: 

Y =X 

en moeten deze integreren voor waarden van 
”Х” tussen 0 en 1. We moeten dus de opper- 
vlakte berekenen, die wordt ingesloten door de 
kurve У = X?; de horizontale as van het assen- 
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stelsel (”Ү” = 0) en de lijn die wordt gegeven 
door de functie ”Х” = 1. 


We zouden in dit simpele geval de bekende 
simpson-regel van de integraalrekening kunnen 
toepassen, maar stel dat we die niet kennen en 
dat we trouwens geen enkel idee hebben van 
hoe we zo’n probleem wiskundig moeten aan- 
pakken. Laten we dan even ons gezonde ver- 
stand gebruiken! 

Als we twee willekeurige getallen beschouwen, 
“XK” en ”Ү”, tussen de waarden 0 en 1, dan zul- 
len beide getallen een punt ”P” bepalen, dat er- 
gens in het vierkant ligt en dat wordt begrensd 
door de waarden ”X” = | еп ”Ү” = 1. Dat 
punt ”Р” kan dan ofwel boven, ofwel onder de 
curve liggen. In het getekende geval zijn ”Х” en 
”У” per toeval zo gekozen, dat het punt ”Р” 
boven de grafiek ligt, 

Het zal duidelijk zijn dat de kans dat het punt 
эр” onder de curve ligt, wordt bepaald door de 
totale oppervlakte onder de curve! Dit is het ge- 
heim van de monte-carlo-integratie! Als we cen 
hele reeks van paren van willekeurige getallen 
opwekken en we berekenen steeds of het punt 
эр”, dat door een paar wordt bepaald, onder of 
boven de curve ligt, dan zal de verhouding tus- 
sen het aantal punten onder de curve en het to- 
taal aantal punten een maat zijn voor de opper- 
vlakte onder de grafiek. 

Uiteraard geeft deze verhouding slechts een be- 
nadering van de gezochte oppervlakte, maar die 
benadering wordt wel steeds nauwkeuriger als 
we het aantal paren laten toenemen. 

Passen we deze techniek eens toe om de opper- 
vlakte onder de ”X-kwadraat”-kurve te be- 
rekenen met als grenzen ”Х” = len ”Y” = 0. 
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Het simpele programma ziet er als volgt uit. 


10 LET H=0 

20 LET №6 

36 LET X=RNO 

40 LET З= 

50 IF YOUR THEN LET H=H+1 

68 LET Kiel 

18 PRINT AT 21,6; "OPPERVLAK="; H/N, "N=";N 
Bü SCROLL 

9% GOTO 30 


Met de variabele "H" tellen we het aantal pun- 
ten onder de curve en met ”N” het totaal aantal 
punten. 

Met de regels 30 en 40 genereren we twee wille- 
keurige getallen, De berekening van regel 50 
onderzoekt of het punt boven of onder de curve 
ligt. Als het onder de curve ligt, wordt de waar- 
de van variabele ”Н” met één eenheid ver- 
hoogd. Door middel van regel 70 wordt de be- 
nadering van de oppervlakte en het aantal 
punten-paren op het scherm geprint. 

Het resultaat: 


OPPERVLAK=1 NEI 
OPPERVLAK=1 №2 
OPPERVLAK=0, 6666667 N=% 
DPPERVLAK=0, 5 №4 
OPPERVLAK=4, 4 №5 


GPPERVLAK=0, 55553555 №6 
OPPERVLAK=0, 42857145 №7 
OPPERVLAK=6, 575 №8 
OPPERVLAK=@, 53555555 №9 


OPPERVLAR=@, 3 №16 
OPPERVLAK=@, 27272727 №11 
OPPERVLAK=@, 25 №=12 


DPPERVLAK=0, 23076925 Кері 
OPPERVLAK=@, 21428571 №14 
OPPERVLAK=@, 2 N=15 
ÜPPERVLAK=0, 1875 №16 
OPPERVLAR=0, 17647659 №17 
OPPERVLAK=@, 14466647 Ме1В 
OPPERVLAK=@. 21052632 №19 


Als u dit programma een hele tijd laat doorlo- 
pen, zult u vaststellen dat de benadering van de 
oppervlakte, die in het begin sterk varieert van 
berekening tot berekening, zeer langzaam naar 
een bepaalde vaste waarde gaat, Uit de traditio- 
nele formules weten we dat de exacte waarde 
van de oppervlakte gelijk is aan 1/3 of 0,33333. 


Waarschijnlijk zal het u zwaar tegenvallen hoe 
lang het duurt voor de monte-carlo-methode 
een enigszins nauwkeurig antwoord heeft uitge- 
werkt. Zelfs na 100 herekeningen is de benade- 
ring nog maar 0,352 en het tweede cijfer na de 
komma varieert nog steeds van berekening tot 
berekening! 

Het lijkt er dus op, dat deze monte-carlo-inte- 
gratie niets meer dan een leuk spelletje is, met 
weinig praktisch nut. Dat klopt, als we ons be- 
perken tot zeer eenvoudige problemen zoals het 
hier behandelde. Als de vraagstelling echter 
veel ingewikkelder wordt, zoals het drie-dimen- 
sionaal werken en het berekenen van het volu- 
me dat onder cen golvend oppervlak ligt, is de 
monte-carlo-integratie een van de beste еп snel- 
ste methoden díe ter beschikking staan! 

Als tweede voorheeld van de ménte-carlo-inte- 
gratie geven we een programma, waarmee we 
de waarde van PI kunnen berekenen. 

Uit de traditionele wiskunde weten we dat het 
integreren van de curve: 

L/(X*X +1) 

tussen 0 en | als resultaat Р1/4 oplevert, 

Als we dus PI willen herekenen, moeten we het 
resultaat van de met monte-carlo gevonden be- 
nadering met vier vermenigvuldigen. 

De volgende twee regels moeten worden aange- 
past. 


ӘРБІР Y<1/(X4X+1) THEN LET H=H+1 
76 PRINT AT 21,0;"PI=";44H/N,"N=";N 


Laat het programma lopen en ga er even rustig 
bij zitten. 


РІ-5, 1894934 №533 
Р1=3, 1910112 №54 
P1=5, 1850457 №555 
PI=3, 1865672 N=536 
PI=3,1880819 N=537 
PI=3, 1821561 №538 
PI=3, 1838735 №539 
PI=3, 1851852 N=540 
PI=3. 1792976 №541 
PISS. 1754317 №542 
PI=3. 174954 N=545 
Pl=3. 1764706 №544 
PIA 1779817 №55 
PI=3, 1794872 N=546 
PI=3, 1869872 N=54] 


P1=3.1824818 №548 
PI=3, 1859709 №59 
PI=3, 1854546 №550 
PI=3. 1869329 N=551 
P1=3, 1884058 N=552 
PI=3.1898734 №553 
PISS, 1913357 N=554 


Wie heeft voldoende geduld om te wachten tot 
de computer in de buurt van PI = 3,14159 
komt? 


Willekeurige getallen en hun problemen 
De betrouwbaarheid van de resultaten van de 
meeste nuttige toepassingen van het werken 
met willekeurige getallen wordt bepaald door 
de “kwaliteit” van deze getallen, Dit probleem 
doet zich nict voor als we spelletjes met wille- 
keurige getallen ontwerpen, we verwachten dan 
niet meer dan dat een speler de volgorde van de 
gegenereerde getallen als volkomen willekeurig 
ervaart. Bij technieken als de monte-carlo-inte- 
gratie worden veel hogere сізеп gesteld aan de 
kwaliteit van de generator, die de willekeurige 
getallen opwekt. Als deze generator bijvoor- 
beeld vaker getallen in de buurt van de | op- 
wekt dan in de buurt van de 0, dan zal het 
schatten van de oppervlakte onder een curve 
duidelijk worden beïnvloed door deze afwijking 
van de generator. 
In feite zouden we dus technieken moeten ont- 
wikkelen, waarmee we de kwaliteit van een ge- 
nerator van willekeurige getallen kunnen be- 
oordelen. Dat is allesbehalve eenvoudig! Dit 
houdt in dat deze testprogramma’s de generator 
moeten laten lopen en de recks getallen die hij 
opwekt — door middel van statistische berekc- 
ningen — op hun "mate van willekeur” moeten 
kunnen beoordelen. 
Zo zouden we kunnen onderzoeken of alle ge- 
tallen even vaak voorkomen, door een histo- 
gram te plotten, waarin een flink aantal getallen 
zijn ondergebracht. 
Toch bestaat er een zeer eenvoudige methode 
om de kwaliteit van een kansgenerator te verbe- 
teren. 
Het onderstaande geeft de typische procedure 
weer, 
| — vul een “array” "AT met afmeting "№ 
met willekeurige getallen van de verdachte 
generator; 
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2 — wek een willekeurig geheel getal ”R” ор 
ergens tussen | еп “М” en verruil de in- 
houd van "AC" met ”A(R)”; 

3 — herhaal deze procedure voor ieder element 
van het ”array”; 

4 — gebruik de ”N” willekeurige getallen in 
het “array” als de volgende ”N” in de 
reeks. 


Met de volgende subroutine kunnen we deze 
procedure in een willekeurig programma in- 
bouwen. 


19 DIM ACN) 


5046 FOR Li TO N 

5010 LET ACL}=RND 

5020 NEXT I 

5030 FOR I=1 T0 N 

5040 LET Т=А(1) 

5050 LET R=INT (RNDSN) +! 1 
3059 LET ACL)=A(R) 

5970 LET A(R)=T 

5080 NEXT I 

5090 RETURN 


Als algemene regel geldt dat de kwaliteit van 
het resultaat verbetert als men het ”schudden” 
langer volhoudt! Helaas vergt deze procedure 
heel wat tijd en als we een heleboel willekeurige 
cijfers nodig hebben kunnen we beter het pro- 
bleem aan de basis aanpakken: de kwaliteit van 
de generator verbeteren! 

Toch kunnen we met deze ”schud”-techniek de 
kwaliteit van een slechte generator aanmerke- 
lijk verbeteren! Gebruik dus deze subroutine in 
geval van twijfel. 


Een zakelijk simulatieprogramma 

Als voorbeeld van het niet wiskundig gebruik 
van de beschreven technieken, gaan we het vol- 
gende praktijkvoorbeeld behandelen. 

Een warme bakker wil op voorhand bepalen 
hoeveel broden hij moet bakken om met zo 
weinig mogelijk oud brood te blijven zitten en 
zo min mogelijk klanten te moeten teleurstellen, 
Als we er van uitgaan dat de cliëntèle iedere 
dag volgens hetzelfde patroon in- en uitloopt, 
kunnen we de poisson-distributie gebruiken om 
de dagelijkse toeloop te simuleren. Deze distri- 
butie is immers bij uitstek geschikt voor het si- 
muleren van gebeurtenissen die per tijdseen- 
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heid steeds dezelfde kans op “het zich 
voordoen” hebben. Als een bepaald soort onge- 
val op ieder moment kan gebeuren, dan zal het 
totaal aantal van dat soort ongevallen over een 
bepaalde tijd worden gegeven door de poisson- 
distributie. 
Terug naar onze warme bakker! We zullen het 
gemiddelde aantal klanten per dag moeten we- 
ten. We kunnen dat aantal bepalen door het an- 
tal klanten over een bepaald aantal dagen te 
tellen (inclusief degenen die teleurgesteld zon- 
der brood naar huis moeten worden gestuurd) 
en dit aantal te delen door het aantal dagen van 
de telperiode. Stellen we het gemiddelde aantal 
klanten per dag gelijk aan ”М”, dan zal volgens 
een poissondistributie het echte aantal per dag 
rond het gemiddelde ”М” schommelen. 
De waarschijnlijkheid om op een bepaalde dag 
”Х” kopers te mogen verwelkomen, wordt ge- 
geven door: 
Мх EXP(—M) 

Ж. | 
Om de gevolgen voor onze klanten vast te stel- 
len als we per dag slechts ”S” broden hakken, 
moeten we getallen gaan genereren volgens de 
poissondistributie met als gemiddelde waarde 
“М” en gaan berekenen hoe vaak het volgens 
de poissondistributie berekende aantal groter of 
kleiner is dan ”5”. 
In de vorm van een programma. 


16 LET L=@ 

26 LET Wee 

38 PRINT TAH 8; "S E R V ICE" 

49 PRINT AT 5,0 

56 PRINT “GEMIDDELD AANTAL KLANTEN" 
89 PRINT "PER DAG "; 

76 INPUT М 

80 PRINT М 

90 PRINT "HOEVEEL KLANTEN KUNT U" 
196 PRINT "PER DAG HELPEN 7%; 

110 INPUT 5 

120 PRINT 5 

136 FOR 1=1 TO 38 

140 50808 1000 

150 IF X35 THEN LET 1514-5 

$60 IF XC5 THEN LET W=W+5-X 

170 PRINT AT 21,6; “DAE "1; "KLANTEN= ";X 
180 SCROLL 

130 NEXT 1 
206 PRINT 


210 SCROLL 

220 PRINT “VERLDREN KLANDIZIE=";L 
230 SCROLL 

240 PRINT “AFSESCHREVEN PRODUCTEN=" № 
256 STOP 


1066 LET X=0 

1016 LET Е=ЕХР-М 

1620 LET P=1 

1030 LET P=PERND 

1040 IF PXE THEN RETURN 
1858 LET Х=Х+1 

1046 БОТО 1836 


Regel 30 tot en met 120 vragen de nodige gege- 
vens voor het berekenen van de diverse groot- 
heden. Het gemiddelde aantal kopers wordt op- 
geslagen in ”M” en het aantal klanten dat per 
dag kan worden geholpen (dus het aantal рег 
dag te bakken broden, in de veronderstelling 
dat iedere klant slechts één brood afneemt) 
wordt ondergebracht іп ”5”. Met de regels 130 
tot 190 simuleren we het aantal klanten dat ie- 
dere dag de bakkerij zal bezoeken. Voor iedere 
dag in een periode van 30 dagen wordt door 
middel van subroutine 1000, die we herkennen 
als ееп paissondistributie, de waarde van ”X” 
berekend. Dit getal wordt vergeleken met het 
aantal gebakken broden. Als er meer kopers 
binnenkomen dan er broden voorradig zijn, 
wordt het verschil berekend іп regel 150. Als er 
daarentegen minder bezoekers zijn dan er bro- 
den in het rek liggen, wordt het overschot aan 
onverkocht brood berekend in regel 160. Na de 
dertigdaagse onderzoeksperiode wordt een som 
gemaakt van het aantal weggestuurde klanten 
en van het totaal aantal onverkochte broden en 
deze twee gegevens worden uitgeprint. 

Met dit simulatieprogramma kan de bakker be- 
palen of hij meer of minder broden moet gaan 
bakken. Natuurlijk zijn er een helebocl facto- 
ren, die deze uiterst eenvoudige simulatie kun- 
nen verstoren. Als bijvoorbeeld de winst op de 
verkoop van een brood veel groter is dan de 
kostprijs zou het toch de moeite waard kunnen 
zijn veel meer broden te bakken dan nvodzake- 
lijk en het verlies aan grondstoffen op de koop 
toe te nemen. U kunt dit programma dus be- 
hoorlijk gaan verfijnen, door bijvoorbeeld in te 
kalkuleren wat het kost om een klant te moeten 
afwijzen en wat het kost om een brood te moe- 
ten weggooien, U zou dan de aangepaste winst 


kunnen berekenen en deze voor verschillende 
hoeveelheden brood kunnen laten uitprinten, 
Men kan dit programma gebruiken als basis 
voor het onderzoeken van de gang van zaken 
voor iedere winkel, waar de voorraden vastlig- 
gen, zoals bijvoorbeeld krantenkiosken. 

Het resultaat van dit programma. 


SERVICE 


GEMIDDELDE AANTAL KLANTEN 
PER DAG 50 


HOEVEEL KLANTEN KUNT U 
PER DAG HELPEN ? 6@ 


DAG 1 KLANTEN=45 

РАБ 2 KLANTEN=57 

DAG 3 KLANTEN=41 

DAG 4 KLANTEN=5@ 

DAG 5 KLANTEN=56 

DAG Б KLANTEN=42 

DAG 7 KLANTEN=44 

DAG В KLANTEN=53 

DAG 9 KLANTEN=54 

DAG 19 KLANTEN=52 
DAG 11 KLANTEN=49 
DAG 12 KLANTEN=4B 
DAG 15 KLANTEN=50 
DAG 14 КІАНТЕМ=51 
DAG 15 KLANTEN=61 
DAG 15 KLANTEN=42 
DAG 17 KLANTEN=57 
DAG 1B KLANTEN=45 
DAG 19 KLANTEN=49 
DAG 20 KLANTEN=57 
DAG 21 KLANTEN=52 
DAG 22 KLANTEN=52 
DAG 23 KLANTEN=44 
DAG 24 КІ АМТЕМ=5{ 
DAB 25 KLANTEN=39 
DAG 26 KLANTEN=45 
DAG 27 KLANTEN=37 
DAG 28 KLANTEN=41 
DAS 29 KLANTEN=46 
DAG 20 KLANTEN=53 


VERLOREN KLANDIZIE=1 
AFGESCHREVEN РЕООИКТЕМ=$ 


We hebben dit programma met opzet eenvou- 
dig gehouden, zodat het erg duidelijk is hoe 
alles in zijn werk gaat. Het ligt voor de hand dat 
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dit soort zakelijke simulaties in de praktijk veel 
ingewikkelder zijn, omdat we ook rekening 
moeten houden met het gedrag van mensen. Zo 
zou het best eens kunnen gebeuren, dat een vas- 
te klant van deze bakker voorgoed naar de kon- 
kurrent gaat als hij een keer nee verkocht krijgt! 
Dit soort effeeten is uiteraard moeilijk in bere- 
keningen te verwerken, 


Sinclair’s driehoek 

Tot slot van dit ”ernstige” hoofdstuk een luchti- 
ge noot. Sinclair’s driehoek is een voorbeeld 
van een willekeurige beweging, dat we voor ons 
plezier kunnen programmeren. Een voorwerp 
voldoet aan een willekeurige beweging, als zijn 
verplaatsing op de een of andere manier door 
de wetten van de waarschijnlijkheid wordt he- 
heerst. In de natuurkunde vinden we talloze 
voorbeelden van willekeurige hewegingen. De 
meest bekende is de ”Brownbeweging”. ge- 
noemd naar de ontdekker, van vloeistofdeeltjes 
in een vloeistof als gevolg van hotsingen van de 
moleculen. Ook stuifmeelkorrels in de lucht 
voeren willekeurige bewegingen uit, veroor- 
zaakt door de wind. 

We kunnen zo’n beweging simuleren door een 
punt te printen met coördinaten (”Х”, У”) еп 
dit punt nadien te verplaatsen door bij heide 
coördinaten een bepaald willekeurig getal op te 
tellen. 

Het onderstaande programma van Sinclair’s 
driehoek geeft een simulatie van de weg, die 
een bliksemflits door de lucht aflegt. 


1 LET ¥=15 
+26 LET 1=0 

38 FOR гі TO 21 

40 IF PND2.5 THEN GOTO 80 
56 LET БІН 

66 РАТАТ AT У, fals IT]" 
7 GOTO 106 

ВӘ PRINT AT У, 1+1; УЗ“ 
98 LET 1=1-1 

108 NEXT У 

116 GOTO 10 


Met regel 10 bepalen we het punt van waaruit 
de bliksemflits ontstaat. De regels 20 tot en met 
100 plotten punten volgens een willekeurige lijn 
van hoven naar beneden over het seherm. Door 
middei van regel 40 bepalen we of de volgende 
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positie naar links of naar rechts moet. In het 
eerste geval zorgen regel 80 en 90 voor het uit- 
plotten van de nieuwe positie, in het tweede ge- 
val wordt deze taak overgenomen door de re- 
gels 50 en 60. Als u dit programma laat 
“RUN”-nen, zult u een aantal onregelmatige 
zig-zag-lijnen over het scherm zien ontstaan. 


Laat u de machine echter een hele tijd lopen. 
dan zal er langzaam maar zeker een schaak- 
hord-vormig patroon ontstaan. Dit patroon kan 
niet anders dan driehoekvormig zijn, omdat alle 
“bliksemflitsen” uit een en hetzelfde punt ont- 
spruiten, 


Dit speelse programma kan hijvoorbeeld wor- 
den gebruikt om de laserstraal uit een ruimte- 
pistool te simuleren! 


Besluit 

In dit hoofdstuk hebben wij bij lange na niet 
alle toepassingen van willekeurige getallen be- 
handeld, We wilden u alleen maar een richtlijn 
geven om zelf te bepalen of simulatietechnieken 


nuttig kunnen zijn in uw eigen specifieke toe- 
passingen. Heeft deze verhandeling een gevoeli- 
ge snaar geraakt, dan raden wij u aan gespecia- 


liseerde literatuur te gaan lezen. 
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10. HET PROGRAMMEREN IN MACHINECODE 


Hoewel we met de 16K-versie van de ZX81 zeer 
uitgebreide programma’s kunnen uitwerken, 
heeft de computer toch het nadeel dat zijn ver- 
werkingssnelheid voor een heleboel zaken, 
zoals het tegelijkertijd laten bewegen van ver- 
schillende objekten of het testen van zijn eigen 
geheugen, veel te traag is. 

We zullen het geduld moeten opbrengen om 
iets langer te wachten op het resultaat van een 
programma. Als we bedenken dat de 7Х81 
slechts een fraktie kost van de prijs die we voor 
een grote computer moeten betalen en toch tot 
dezelfde dingen in staat is, kunnen we hem zijn 
traagheid gemakkelijk vergeven! 

Toch zijn er toepassingen waar de traagheid 
van de machine, zelfs in de ”РАЗТ”-тоде, te 
groot is om er op een redelijke manier gebruik 
van te maken. Als het antwoord op een vraag 
minutenlang op zich laat wachten is de kans 
groot dat de gebruiker van de computer onder- 
tussen een kopje koffie is gaan drinken en het 
hele programma al weer is vergeten! Verder is 
best een uitgehreide versie van een populair 
spel als “ruimte veroveraars” in BASIC te pro- 
grammeren, maar het zou waarschijnlijk het 
traagste spel zijn dat ooit voor een computer is 
geschreven. Dit soort spelletjes moet het nu net 
van snelheid hebben. 

Kortom, waarvoor u de ZX81 ook gebruikt, er 
komt altijd een moment waarop u wordt gecon- 
fronteerd met zijn snelheidsgrens. 

Het verrassende is, dat we de oplossing niet 
moeten zoeken in het kopen van een duurdere 
en krachtigere microcomputer, Alle microcom- 
puters en misschien zelfs alle computers, zullen 
voor sommige toepassingen te traag blijken te 
zijn. We kunnen de snelheid van onze computer 
echter zo verhogen dat hij alles kan wat een 
grote machine kan. Maar daar staat wel tegen- 
over, dat we de zo vertrouwde BASIC-taal zo 
snel mogelijk moeten vergeten en moeten gaan 
wennen aan iets geheel nieuws; de Z80-MA- 
CHINECODE! 

Laat u door niemand iets op de mouw spelden. 
machinecode is veel moeilijker dan BASIC! 
Waarom zou men anders die trage BASIC nog 
gebruiken? 
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Bovendien moeten we ons behoorlijk diep in de 
materie van machinecode-programmering stor- 
ten alvorens we tot iets behoorlijks in staat zijn. 
We zijn ons er terdege van bewust, dat we bij u 
nu al een behoorlijke afkeer van machinecode 
aan het kweken zijn, maar we hopen toch dat 
de rest van dit hoofdstuk u voldoende aanlei- 
ding zal geven om over uw angst heen te stap- 
pen en de wondere wereld van het programme- 
ren in machineeode onbevangen te betreden. 
Wel moet u zich goed realiseren dat machineco- 
de niet op één zonnige namiddag kan worden 
geleerd. Maar probeer door te zetten, het is de 
moeite waard! 


De traagheid van BASIC 

BASIC behoort tot de zogenoemde hogere pro- 
grammeertalen, die ter beschikking staan voor 
het programmeren van computers, De meeste 
computers kunnen in hogere talen, zoals BA- 
SIC, FORTRAN, ALGOL en dergelijke wor- 
den geprogrammeerd. Zelfs de kleine ZX81 zou 
in principe in gelijk welke hogere taal met zijn 
gebruiker kunnen kommuniceren. Maar daar 
BASIC aan de meeste wensen tegemoet komt, 
heeft nog niemand de moeite genomen de ma- 
chine aan te passen aan een andere taal. 
Computers kunnen verschillende talen ver- 
staan, omdat iedere hogere taal wordt omgezet 
in een veel fundamentelere taal alvorens het 
programma wordt uitgevoerd, Deze fundamen- 
tele taal noemt men machinecode en dit is de 
enige taal die rechtstreeks door de machine kan 
worden verwerkt. Het probleem is dat iedere 
machine zijn eigen machinecode heeft en dat 
dus iedere machine de hogere talen op een spe- 
cifieke manier moet vertalen. 

De konsekwentie is dus dat er niet zoiets bestaat 
als DE machinecode! De code die een machine 
verstaat wordt bepaald door de microprocessor 
die in het apparaat is toegepast. Zo’n mieropro- 
cessor is een zeer ingewikkeld elektronisch on- 
derdeel en vormt het hart van de computer. De 
ZX81 past een Z80-microprocessor toe en bijge- 
volg moeten we ons de Z80-machinecode eigen 
maken. In feite is het helemaal geen slechte 
keuze voor de eerste kennismaking met een ma- 


chinecode, want de Z80 wordt in heel wat com- 
puters toegepast. 

We moeten ons wel realiseren dat een aantal 
populaire microcomputers zoals de APPLE en 
de PET niet rond de 780 zijn opgebouwd. 

De ZX81 moet de door u ingetoetste BASIC-in- 
strukties eerst in Z80-machinecode vertaten, al- 
vorens hij er iets mee kan doen. 

Dat vertaalproces kan op twee manieren wor- 
den aangepakt. Er zijn machines die het volle- 
dige BASIC-programma in één keer omzetten 
in machinecode en dan aan de slag gaan; zo’n 
vertaalprogramma noemt men een ”compiler” 
(letterlijk vertaald: verzamelaar). Dit soort ma- 
chines is meestal niet zo gemakkelijk te pro- 
grammeren als de ZX81; die gebruikt een ande- 
re techniek, 

Bij de Sinclair computer wordt iedere BASIC- 
regel eerst vertaald en dan uitgewerkt. Het BA- 
SIC-sleutelwoord wordt in de machine vergele- 
ken met een vertaallijst. Wordt het sleutelwoord 
in deze lijst gevonden, dan weet de machine wat 
voor soort akties er van hem worden verlangd. 
Als de BASIC-instruktie bijvoorbeeld "GOTO 
10” luidt, dan zondert de machine het sleutel- 
woord ”GOTO” af uit de regel en zoekt in de 
ingebouwde lijst op wat er bij een ”GOTO” te 
gebeuren staat. In dit specifieke geval vinden 
we in deze tabel het machinecode-ekwivalent 
voor: "werk de uitdrukking achter "GOTO’ uit, 
zoek in het programma de regel met hetzelfde 
regelnummer en zorg dat deze instruktie wordt 
uitgevoerd.” 

De omzetting van BASIC in machinecode 
noemt men “interpreting” en het programma 
“interpreter”, letterlijk vertaald: tolk. Omdat de 
7Х81 iedere BASIC-regel eerst gaat “interpre- 
teren”, werkt het geheel erg traag. Alvorens het 
BASIC-bevel uit te voeren, moet de machine 
heel wat tijd spenderen aan het opzoeken van 
wat deze BASIC-regel nu wel precies wil zeg- 
gen! 

Bij rechtstreeks gebruik van machinecode in 
programma’s doen dit soort vertaalproblemen 
zich natuurlijk niet voor. Vandaar dat zo’n pro- 
gramma wel tien keer sneller door de machine 
kan worden uitgevoerd! 


De karakteristieken van machinecode 

Het ligt voor de hand ons af te vragen waarom 
we niet vaker van machinecode gebruik maken, 
als deze taal zo snel is. Het antwoord op deze 


vraag hebben we in de inleiding van dit hoofd- 
stuk reeds even aangestipt: programmeren in 
machinecode is veel ingewikkelder dan pro- 
gramma’s opstellen in BASIC. En, vreemd ge- 
noeg, dit verschijnsel wordt nu net veroorzaakt 
doordat machinecode zo’n eenvoudige taal is! 
BASIC is een taal, die geschreven is naar men- 
selijke begrippen. Als u ergens de BASIC-uit- 
drukking: 


LET A=B+C#2-Z 


ziet staan, dan weet u precies wat daarvan de 
bedoeling is en dat het resultaat van deze bere- 
kening in "A" wordt opgeslagen. Machinecode 
werkt niet met zulke ”ingewikkelde” dingen als 
vermenigvuldigen en delen. Machinecode kent 
slechts twee bewerkingen: optellen en aftrekken 
en deze bewerkingen kunnen slechts één voor 
één in een bepaalde geheugenplaats worden 
uitgevoerd. Moeilijke bewerkingen zoals verme- 
nigvuldigen, moeten dus opgesplitst worden in 
een aantal simpelere bewerkingen. Het verme- 
nigvuldigen van twee getallen kan in machine- 
code alleén door herhaaldelijk optellen. 

Het is zeer zeker niet de bedoeling u te onder- 
wijzen in machinecode, Wat we wel hopen is 
dat u, door wat volgt, de smaak van machineco- 
de-programmering te pakken krijgt en enig in- 
zicht opdoet over de fundamentele ideeën. De 
beste manier om dit te bereiken is: enige simpe- 
le voorbeelden behandelen. Vooreerst moeten 
we iets meer weten over de architectuur van de 
in de ZX81 gebruikte microprocessor 2,80. 


De Z80 - microprocessor 

Hoewel de Z80 een van de snelste en veelzijdig- 
ste microprocessors is die op de markt zijn, kan 
hij toch maar zeer eenvoudige bewerkingen uit- 
voeren. Hij kan zich toegang verschaffen tot ie- 
dere geheugenplaats, maar is niet in staat de in- 
houd van zo’n geheugenplaats rechtstreeks te 
wijzigen. 

Ieder bewerking moet in speciale geheugen- 
plaatsen in de microprocessor zelf worden uit- 
gevoerd. Deze speciale geheugenplaatsen 
noemt men ”registers” еп omdat er maar een 
beperkt aantal beschikbaar zijn, worden ze door 
middel van een naam in plaats van door middel 
van adressen aangeduid. 

Uit het totale aantal zullen we er vier bespre- 
ken. 
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- het A-register, dat “accumulator” wordt ge- 
noemd; 

— het B-register, 

het H-register en 

— het L-register, 


Het A-register is het meest nuttige en wordt 
vooral voor wiskundige bewerkingen gebruikt. 
Het ziet er net zo uit als een gewone geheugen- 
lokatie en kan getallen tussen 0 en 255 opslaan, 
Het B-register staat ter beschikking voor alge- 
mene toepassingen, voornamelijk voor het be- 
waren van tijdelijke resultaten zonder dat het 
externe geheugen hoeft te worden aangespro- 
ken. In dit B-register kunnen slechts een be- 
perkt aantal bewerkingen worden opgeslagen 
en ook in dit register kunnen we getallen tussen 
0 еп 255 onderbrengen. Ook de H- en 
L-registers staan ter beschikking voor algemene 
toepassingen, maar omdat ze meestal gecombi- 
neerd worden toegepast, spreekt men over het 
HL-paar. Door het invoeren van een register- 
paar kunnen we natuurlijk de hoeveclheid op te 
bergen informatie aanzienlijk uitbreiden. We 
hebben dan voldoende ruimte om het adres van 
gelijk welke geheugenlokatic uit het totale ge- 
heugen van de machine op te bergen, Het HL- 
paar dient voornamelijk voor dit doel; vandaar 
dat men dit paar het adresregister noemt. Bij 
een heleboel Z80-berekeningen wordt het in het 
HL-register opgeslagen getal gehruikt als het 
adres van de geheugenlokatie die aan de orde 
1s. 

Dit hele verhaal over registers en wat we ermee 
kunnen doen, krijgt meer inhoud als we enige 
voorbeelden van Z80-instrukties gaan behande- 
len. 


De ”LD”- en ”ADD”-instrukties 

De 280 herkent machinecode-commando’s aan 
hun codegetallen, Een machinecode-program- 
ma is dus niets anders dan een lange lijst met 
getallen die in het geheugen van de computer 
wordt opgeslagen. Het probleem hierbij is dat 
wij, mensen, niet zo goed in staat zijn te begrij- 
pen wat deze onoverzichtelijke reeks van getal- 
len nu wel mag voorstellen. Getallen vormen 
niet onze natuurlijke menselijke taal! Om het 
geheel wat toegankelijker te maken, gaan we 
daarom die codegetallen vervangen door iets 
meer zeggende symbolen. 

Als wij bijvoorbeeld het A-register willen gaan 
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laden met de inhoud van geheugenlokatie 123, 
kunnen we de volgende versie van de ”LD”-in- 
struktie gebruiken: 


LD A, (123) 


hetgeen u kunt lezen als: “laad het A-register 
met de informatie van geheugenlokatie 123”, 
Het is namclijk in de Z80-machinecode сеп on- 
geschreven regel dat alles wat tussen haakjes 
staat wordt geïnterpreteerd als een adres. 

Voor mensen is de instruktie duidelijk, de Z80 
kan echter geen letters lezen; dus moet deze 
boodschap op de een of andere manier worden 
vertaald in cijfers. 

Daarvoor staat een lijst ter beschikking, de zo- 
genoemde instruktielijst en als u daarin opzoekt 
wat de code is voor de instruktie "LD A”, dan 
vindt u het getal 58, 

Deze instruktielijst vindt u in appendix A van 
de ZX81-handleiding, Deze cijfercode staat be- 
kend onder de naam “operation code” of ”ор- 
code”, De ”ор-сойе” voor "LD A” vanuit cen 
geheugenlokatie is dus 58. 

De kompleet gecodcerde instruktie bevat uiter- 
aard ook het adres van de geheugenlokatie die 
naar het A-register moet worden overgebracht, 
Dit adres wordt opgenomen па de ”ор-сойе”. 
De instruktie "LD А, (123)” wordt dus als volgt 
іп machinecode geschreven: 58,123,0. De nul is 
noodzakelijk, omdat er voor het bewaren van 
een adres steeds twee geheugenlokaties worden 
gebruikt en voor adressen kleiner dan 255 moet 
dus dat tweede, ongebruikte, geheugenplekje 
worden opgevuld met een nul, 

Voor het opslaan van zo’n simpele instruktie als 
het laden van de accumulator hebben we dus 
drie geheugenplaatsen nodig. Er zijn Z80-in- 
strukties die met minder geheugenruimte toe 
kunnen, maar er zijn er ook die er meer dan 
drie nodig hebben! 

Als tweede voorbeeld van cen machinecode-in- 
struktie behandelen we; 


ADD Bn 


Hierbij staat ”n” voor een getal tussen 0 en 255. 
Met deze instruktie wordt het getal ”п” opge- 
teld bij de inhoud van het A-register. Als er in 
de accumulator reeds een getal van 3 was opge- 
slagen, zal de geheugeninhoud worden ver- 
hoogd tot 8 na het uitvoeren van de instruktie 
PADD А, 5”. 


De ”ор-соде” voor deze instruktie is 198 en het 
getal ”n” wordt in de eerstvolgende geheugen- 
plaats opgeslagen. Omdat de waarde van ”n” 
tussen 0 en 255 moet liggen, hebben we slechts 
één geheugenlokatie nodig. De komplete ma- 
chinecode voor PADD A,5” luidt dus ”198,5” 
en kan in twee geheugenplaatsen worden opge- 
slagen. 

Men schrijft een machinecode-programma door 
gebruik te maken van het soort uitdrukkingen 
als ”LD” en ”ADD”. Nadat het volledige pro- 
gramma op papier staat, duikt men in de іп- 
struktielijst en gaat moeizaam alle notaties ver- 
vangen door de bijbehorende codenummers. 
Het omzetten van symbolen in codenummers is 
zo’n standaard-procedure, dat er een kompleet 
programma voor bestaat en men het aan de ma- 
chine kan overlaten! Zo’n omzettingsprogram- 
ma gaat door het leven onder de naam ”аззет- 
bler” en dank zij dit soort programma’s wordt 
het programmeren in machinecode toch iets 
wat nog te doen valt! Helaas heeft de 2Х81 niet 
zo’n assembler als standaard-pakket, maar we 
zouden het zelf kunnen opstellen of kant-en- 
klaar kopen hij een van de talloze software le- 
veranciers, die zich gespecialiseerd hebben in 
het ontwikkelen van software voor Sinclair 
computers. 


Een klein programma als voorbeeld 

We willen zeer zeker niet de suggestie wekken 
dat na deze inleiding en het behandelen van 
twee machinecode-instrukties u voldoende weet 
van het onderwerp om te beginnen met het 
schijven van machinecode-programma’s. Wél 
moet u in staat zijn te hegrijpen hoe zo’n pro- 
gramma in principe werkt. In de "BASIC 
ROM” zit een kleine machinecode-subroutine 
Gtartend op adres 2056) waardoor de machine 
het symbool, waarvan de machinecode in de ac- 
cumulator staat, op het scherm print. 

Nu we dit weten, kunnen we een machinecode- 
programma ontwerpen, waardoor het scherm 
wordt volgeschreven met een door ons gekozen 
symbool, 


START LD A, 21 
CALL 2056 
JP START 


Als gevolg van de eerste instruktie van dit pro- 
gramma, wordt de accumulator geladen met het 


getal 21, de machinecode voor het ”+”-sym- 
bool. De tweede instruktie is het machinecode- 
ekwivalent van een BASIC ”СОЅОВ” en door 
deze ”CALL” gaat de machine als volgende 
stap naar adres 2056 waar, zoals we nu weten, 
een subroutine start die ervoor zorgt dat de in- 
houd van de accumulator op het scherm wordt 
geprint. Het resultaat van deze ”CALL” is dur 
dat er op het scherm een plusje verschijnt. De 
laatste instruktie is het machinecode-ekwivalent 
van de BASIC ”GOTO” en de machine wordt 
daardoor naar de ”START” van het program- 
ma gestuurd. ”JP” is de afkorting уап ”JUMP”, 
de laatste instruktie zegt dus niets anders dan: 
”JUMP TO START” of "spring naar start”. De 
werking van dit programma is dus vrij snel te 
doorgronden; het print het scherm vol plusjes 
en als het scherm vol is, verschijnt er een fout- 
code. 

In de praktijk moeten we er dus voor zorgen dat 
de machinecode-subroutine wordt gestopt na- 
dat de computer hem heeft uitgewerkt. Voor de 
eenvoud hebben we dat nu niet gedaan, van- 
daar dat het programma vanzelf stopt als het 
scherm vol staat en er een fout wordt gerappor- 
teerd. 

De drie regels vormen een kompleet uitgewerk- 
te machinecode-programmering. Natuurlijk 
moeten we deze mededeling nu nog gaan code- 
ren en testen. 

Coderen is niets anders dan de door mensen ge- 
bruikte taal omzetten in cijfercodes, die de ma- 
chine hegrijpt. Voor de eerste twee regels van 
het programma gaat dat zonder problemen. 


instructie code 
START LD A, 21 62,21 
CALL 2056 205,0,8 


De code voor "LD A”, gevolgd door een getal, 
is 62” en het getal dat in de accumulator moet 
worden geladen volgt direkt op de op-code, hier 
21 dus. 

Пе “opcode” voor ”CALL” is ”205” en het 
adres waar de ”CALL” naar verwijst, moet in 
de twee volgende geheugenlokaties worden on- 
dergebracht. Omdat dit adres groter is dan 255, 
moet het volgens de bekende systemen worden 
opgesplitst in twee getallen, dus 2056 = 8 + 8 + 
256. 

Bij het omzetten van de laatste regel van het 
programma stuiten we op een probleem! De 


75 


“op-code” voor de ”JP” is zo op te zoeken: 
2195”, Het onderbengen van het ”JUMP”- 
adres is ook geen punt; daarvoor staan de twee 
volgende geheugenlokaties ter beschikking, 
Waar we echter op vastlopen is dat we niet we- 
ten op welke geheugen-lokatie het programma 
start! 
We moeten nu eerst gaan bepalen waar we dit 
programma in het geheugen willen onderbren- 
gen. Het totale geheugen heeft een aantal 
zones, die geschikt zijn voor het onderbrengen 
‚ van machinecode-programma’s. In hoofdstuk 8 
hebben we gezien dat machinecode kan worden 
opgeslagen in een gedeelte van het geheugen na 
"RAMTOP”. 


In dit hoofdstuk gaan we echter een praktischer 
manier voor het opbergen van machinecode 
toepassen. We zullen een ”REM”-instruktie 
aan het begin van het programma opnemen en 
de codes daarin verwerken door simpelweg de 
bij iedere code behorende toets in te drukken! 
De vijf eerste codes van dit programma waren 
”62, 21, 205, 8, 8”. Deze codes komen overeen 
met de volgende toetssymbolen: "Y, +, LN, 
(A), AT, 

We kunnen nu de volldige machinecode als 
volgt in de ”REM-instruktie opnemen. 


16 REM Y+LNCAILA] 


Hierbij staat ”LN” voor één enkel symbool, dat 
korrespondeert met de ”LN”-functie van het 
toetsenbord en dit symbool wordt ingevoerd 
door het na elkaar indrukken van de functie- 
toets en de ”2”, *(А)” staat voor het grafische 
symbool van de A-toets. 

Nu kunnen we de laatste regel van het pro- 
gramma afwerken, want we kunnen het start- 
adres van het programma gaan berekenen. Alle 
BASIC-programma’s starten op geheugenloka- 
tie 16509. Er worden twee bytes gebruikt voor 
het opslaan van het regelnummer, evenveel 
voor de lengte van de regel en één voor het 
sleutelwoord "REM", Een simpel optelsom- 
metje leert dat het eerste symbool van de 
PREM” in lokatie 16514 thuis hoort. De laatste 
regel van het programma wordt bijgevolgd: ”JP 
16514”, hetgeen wordt gecodeerd als: 


JP 16514 
195, 156,64 
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Ook deze codegetallen moeten natuurlijk in de 
PREM” worden opgenomen, maar alweer wor- 
den we geconfronteerd met een moeilijkheid! 
Wat is namelijk het geval? De symbolen, die 
overeen komen met de codes 130 en 64 zijn res- 
pektievelijk (W) en "RND”, dat is geen 
punt. Voor het getal 195 staat echter geen sym- 
bool ter beschikking! Deze code kan dus niet 
rechtstreeks in de ”REM”-instruktie worden 
opgenomen. 

Wat nu? 

We nemen een spatie op in de ”REM”-instruk- 
tie en gaan de juiste code in die spatie opnemen 
door middel van een ”РОКЕ”! Met deze 
”РОКЕ” gaan we dus de code voor het spatie- 
symbool vervangen door de code, waarvoor 
geen symhool ter beschikking staat. 

We kunnen nu weliswaar de volledige "REM". 
instruktie opnemen, aangevuld met een 
”POKE”-regel, maar we weten nu nog niet hoe 
we de machine aan het verstand moeten bren- 
gen, dat we machinecode willen invoeren. 

Bij het bespreken van het gehruik van de ZX- 
printer in hoofdstuk 8 hebben we gezien dat we 
de ”USR”-functie kunnen gebruiken om toe- 
gang te krijgen tot een machinecode-subrouti- 
ne. Even recapituleren. 


USR adres 


leidt de machine naar een machinecode-sub- 
routine, die start op de geheugenlokatie met 
nummer ”adres”. 

Omdat USR” een functie is en geen instruktie, 
moeten we het opnemen in cen opdrachtin- 
struktie, zoals: 


LET ñ=USR adres 


In het kader van deze voorbeelden zijn we niet 
geïnteresseerd in de waarde, die in “A” wordt 
opgeslagen als gevolg van de ”USR”-functie. 
We weten ondertussen het startadres van de 
machinecode-subroutine (16514), zodoende 
wordt de uitgewerkte ”USR”: 


LET BIER 16514 


Het is best de moeite waard een volledig over- 
zicht te geven van alle adressen die we voor dit 
programma gebruiken en van wat er allemaal 
in die geheugenplaatsen is opgeborgen. 


adres cade sysbool 
16514 b2 Y 
16515 2 + 

16516 205 LN 
16517 8 [ñ] 
16518 8 [A] 


16519 185 geen 
16520 130 IW) 
16521 м RND 


Het nut van deze tabel 15 dat we nu in één oog- 
opslag kunnen zien dat de op-code waarvoor 
geen symbool ter beschikking staat (195, weet u 
nog?) naar adres 16510 moet worden ре? 
’POKE”-ed! 


We zijn nu eindelijk zo ver, dat we het kom- 
pleet uitgewerkte programma kunnen presente- 
ren. 


18 REM ҰН МАТА) CWIRNG 
28 POKE 16519, 195 
36 LET AFUSR 16514 


Het is van het uiterste belang dat de ”REM”- 
regel precies zo wordt ingevoerd als genoteerd, 
Dus: LN” en ”RND” door middel van één 
toctsdruk, "LAT" еп "(WI onder de vorm van 
hun grafische symbolen en één spatie tussen de 
tweede "LAT" еп de “(ХУ)”, 

U zult konstateren dat dit programma het 
scherm in een zeer hoog tempo vult met alle- 
maal plusjes. U kunt de verwerkingssnelheid 
vergelijken met hetzelfde programma in BA- 
SIC: 


40 PRINT "+° 
50 GOTO 40 


Een opmerkelijk verschil! 

In de inleiding van dit programma hebben we 
gesteld dat we machinccode-programma’s ook 
kunnen kontroleren. Dat is niet zo moeilijk, het 
enige wat moet gebeuren is het toevoegen van 
onderstaande subroutine, waardoor de inhoud 
van iedere geheugenlokatie in de "REM" op 
het scherm wordt gezet. 


46 FOR 1=16514 TO 16521 
78 PRINT I,PEEK I 
88 NEXT 1 


U kunt dit programma aktiveren door "GOTO 
60” in te toetsen, 

Met de bespreking van dit programma hebben 
we, zo hopen we, voldoende aangetoond dat we 
de moeilijkheidsgraad van het programmeren 
in machinecode niet hebben overschat! 

Hoewel dit zeer simpele programma maar drie 
machinebewerkingen bevat, kost het heel wat 
tijd om het op te stellen en nog veel meer tijd 
om uit te leggen hoe alles werkt. 

Toch kunt u aan de hand van dit voorbeeld een 
objektieve kijk krijgen op het grote voordeel 
van machinecode, door het vergelijken van de 
verwerkingssnelheden van hetzelfde program- 
ma geschreven in BASIC en geschreven in ma- 
chinecode. 


Een tweede voorbeeld: het inverteren van het 
scherm 

Dit tweede voorbeeld beschrijft een machineco- 
de-subroutine, waarmee we de inhoud van het 
scherm kunnen inverteren. Met andere woor- 
den: alles wat wit was wordt zwart en vice ver- 
sa. Dit is een zeer nuttig programma: we kun- 
nen er knipperende mededelingen mee op het 
scherm schrijven, hetgeen goed van pas komt 
bij het programmeren van spelletjes of als we in 
een “serieuze” toepassing de aandacht op een 
bepaalde mededeling willen vestigen. 
Daarnaast is het een goed voorbeeld van hoe 
lange machinecode-programma’s worden opge- 
bouwd, Het programma is echter zo uitgebreid 
dat we niet op alle details kunnen ingaan zoals 
dat bij het eerste voorbeeld is gedaan. 

Wat we wél doen, is het systeem verklaren en 
een korte toelichting geven bij iedere instruktie. 
Ook de volledige codering wordt gegeven, maar 
niet uitvoerig besproken. 

In principe komt het er op neer, dat we iedere 
symboolcode vermeerderen met het getal 128. 
Uit de gegevens in appendix. А van de 2Х81- 
handleiding, blijkt immers dat de codes van een 
symbool en zijn inverse steéds 128 verschillen. 
Het opstellen van die waarde bij een symbool- 
code heeft dus tot gevolg, dat het symbool in 
zijn inverse wordt omgezet. Minder voor de 
hand liggend is dat het nogmaals optellen van 
128 het originele symbool te voorschijn tovert. 
Toch is dat niet zo moeilijk in te zien. Zoals we 
weten, kunnen we in de accumulator getallen 
tussen 0 en 255 opslaan. Als de inhoud 255 is en 
we tellen er 1 bij op, dan ”springt” de inhoud 
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van het register als het ware terug naar 0 zonder 
dat er een foutmelding optreedt. Als u dus bij 
de inhoud van het A-register een getal optelt en 
de som van beide getallen is groter dan 255, dan 
zal de inhoud van het register gelijk worden aan 
de som minus 256. 

Het twee maal achter elkaar optellen van de 
waarde 128 herstelt dus als het ware de origine- 
le inhoud van het register, want twee maal 128 
is 256! 

Een voorbeeld: 

Stel, dat in het register het getal 38 staat, de 
code voor de letter "A", Tel daar 128 hij op, 
door middel van een “ADD А, 128”-instruktie. 
Het resultaat is 38 + 128 = 166, de code voor 
het geïnverteerde ”A”-symbaol. Geef nu weer 
dezelfde instruktie. In het register zou een 
waarde van 166 + 128 = 294 worden opgesla- 
gen, maar dit getal is groter dan de maximale 
inhoud van het register en dus zal de teller na 
het bereiken van inhoud 255 teruggaan naar 0 
en vanaf deze waarde verder tellen. Het resul- 
taat wordt 294 — 256 = 38, de code voor het 
originele symbool "A"? 

Samengevat: het optellen van het getal 128 bij 
de inhoud van het register inverteert het sym- 
bool en dezelfde bewerking voor de tweede 
maal uitgevoerd, herstelt het originele symbool. 
Dit was even een moeilijk puntje, de rest van 
het programma gaat recht op het doel af! 

Eerst zoeken we het adres op van de eerste ge- 
heugenlokatie van de schermbeeldzone van het 
geheugen. Nadien wordt dit adres in de accu- 
mulator opgeslagen en wordt er 128 bij opge- 
teld. Vervolgens zeten we deze nieuwe code 
van het geïnverteerde symbool weer op de ori- 
ginele plaats terug. 

Wel zitten er enige addertjes onder het gras! 

Op de eerste plaats moeten we rekening houden 
met de code van een “terug naar de kantlijn”- 
commando, want het zal duidelijk zijn, dat we 
deze code niet mogen veranderen, 

Op de tweede plaats moeten we ervoor zorgen 
dat we na het behandelen van 21 regels het pro- 
gramma laten stoppen. Beide problemen heb- 
ben iets met elkaar te maken. 

Telkens als we de code voor een “newline”- 
commando tegenkomen, weten we immers dat 
we één regel van het seherm onder handen heb- 
ben genomen. 

Beide problemen kunnen we dus in één keer 
oplossen door de inhoud van het A-register te 
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kontroleren. Als deze gelijk wordt aan 118, de 
code voor ееп “terug naar de kantlijn”-instruk- 
tie, mag de inhoud niet met 128 worden ver- 
meerderd. Bovendien gaan we het aantal keren 
dat we code 118 in de accumulator tegenkomen, 
tellen in het B-register. Uit praktische overwe- 
gingen draaien we dit laatste om: we zetten 
eerst het getal 21 in het B-register en gaan die 
waarde telkens als we in de accumulator code 
118 tegenkomen met één verminderen, Na 21 
regels is de inhoud van het B-register gelijk aan 
nul en dit kunnen we gemakkelijk vaststellen. 
Het enige, wat we nog moeten vertellen is dat 
een machinecode-programma steeds eindigt 
met een ”RET”-instruktie. waardoor de machi- 
ne weet dat er nadien weer naar BASIC wordt 
omgeschakeld, 

Het komplete programma ziet er als volgt uit: 


adres instructie code 
16514 LD HL, (10590) 42,12,64 


16517 LD 5,21 8,2 
16519 ma 35 

16520 LD A, (HL) 126 

16521 СР 118 254,18 
16523 JP 1,16532 202,148,64 
16526  ADDA,128 198,128 


16528 LD (HL),A 119 


16529 ЧР 16519 195, 135,64 
16532 DEC B 65 
16533 JP №,15519  194,135,64 
16526 RET 291 


In het kort wat kommentaar: 

— LD HL, (16396) laadt het HL-paar met het 
adres van het begin van de beeldzone; 

— LD B, 21 zet het getal 21 in het B-register, 
waarmee we het aantal regels zullen gaan 
tellen; 

— INC HL verhoogt de waarde in het HL-paar 
met 1; 

— LD A, (HL) transporteert het getal in het 
HL-paar naar de accumulator; 

— CP 118 vergelijkt de inhoud van de accumu- 
lator met 118, waardoor we te weten komen 
wanneer de computer aan een nieuwe regel 
begint; 

— JP Z, 16532 stuurt de machine naar adres 
16532 als de inhoud van de accumulator ge- 
lijk is aan 118; 

— ADD A, 128 verhoogt de inhoud van de ac- 


cumulator met 128 waardoor het symbool 
wordt geïnverteerd; 

— LD (HL), A stuurt de inhoud van de accu- 
mulator, de code van het geinverteerde sym- 
bool, terug naar de oorspronkelijke plaats; 

— JP 16519 stuurt de machine naar adres 
16519; 

— DEC B vermindert de waarde van register B 
met een eenheid; 

— JP NZ, 16519 stuurt de machine naar adres 
16519, als de inhoud van B nog niet gelijk is 
aan nul; 

— RET kondigt het einde van het machineco- 
de-programma aan. 


De volgende stap is het omzetten van alle in- 
strukties in de bijbehorende machinecodes. 


adres code symbool 
16514 42 Е 
16515 12 £ 
16516 Di RND 
16517 96 {Т} 
16518 21 + 
16519 35 7 
16520 12 geen 
16521 258 RETURN 


16522 118 geen 
16525 20 ASN 
16524 148 inverse = 
16525 ы END 
16526 198 LEN 
15527 128 I) 
16528 119 geen 
16529 195 geen 
16530 155 [3) 
16531 ы RND 
18552 95 [51 
16533 194 TAB 
16534 155 3] 
16535 ы RNG 
18558 21 TAN 
18 КЕМ EERND[TJ+7 RETURN ASN [=)RNDLEN 
CUE ZIRNDCSI TABLE SIRNDTAN 
20 POKE 16520, 126 
30 FOKE 16522, 118 
4% POKE 16528, 119 
5% POKE 1529, 195 


Hieruit blijkt dat er vier codes zijn, die we niet 
rechtstreeks door middel van symbolen in een 


”*REM”-instruktie kunnen onderbrengen. We 
moeten dus op de bekende manier vier 
”POKE”-bevelen opnemen en de "REM”-regel 
voorzien van de nodige spaties. In hoofdstuk 8 
hebben we uitgelegd hoe we sleutelwoorden als 
“RETURN” kunnen invoeren, 

Het volledige programma luidt: 


50 PRINT "ИЕН" 
79 LET IER 16514 
86 GOTO 70 


500 FOR 1=16514 TO 16536 
518 PRINT 1,PEEK I 
520 NEXT I 


Subroutine 500 geeft de van het vorige voor- 
beeld bekende methode om de opgeslagen 
codes op het scherm te zetten, ter kontrole van 
het programma, 

Hoewel dit programma niet tot in alle bijzon- 
derheden is verklaard, zal men het na een gron- 
dige studie toch wel kunnen bevatten. 


NAWOORD 


Hopelijk hebben de twee in hoofdstuk 10 he- 
handelde voorbeelden van het programmeren 
in machinecode u zover gebracht dat uw aan- 
vankelijke huiver voor het bestuderen van ma- 
chinetaal is vervangen door de wens naar meer. 
Zeker nu u met eigen ogen hebt gezien hoeveel 
sneller in machinecode geschreven program- 
ma’s worden uitgevoerd, zal de volgende stap 
op de weg naar volleerd computerprogrammeur 
u voeren door het onontgonnen gebied van de 
machinetaal, 

Er zijn een heleboel hoeken, die u daarbij kunt 
raadplegen. 

Sommige zijn speciaal naar de ZX81 machine 
toegeschreven, andere behandelen de Z80-ma- 
chinetaal in een meer algemeen, niet machine- 
gebonden kader, maar zijn even bruikbaar. 

Of u nu wel of niet besluit om over te stappen 
op het programmeren in machinetaal, wij ho- 
pen toch dat dit hoek u op weg heeft geholpen 
in het exploreren van de nieuwe mogelijkheden 
van de 16K-versie van de ZX81. 

De mogelijkheden zijn eindeloos! 
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